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ABSTRACT 


The function of the DMC11 diagnostics is to verify that the 
option operates according to specifications. The diagnostics 
verfiy that there are no malfunctions and the all operations 
cf the DMC11 are correct in its environment. 


Parameters must be set up to alert the diagnostics to the 
DMC11 configuration. hese parameters are contained in the 
STATUS TABLE and ere generated in two ways: 1) Manual 
Input - the operator anSwers questions. 2) Autosizing - the 
program determines the parameters automatically. 


DZDMH tests the DMC1I-AR and DMCLI-AL = micro-processors 
(MB200-YA and MB200-YB), or the KMC11 micro-processor (M8204). 
Free running tests are performed. A line unit (M8201 or 

must be installed. OZDMH can be used as a heat test 
diagnostic by manufacturing. 


Currently there are five off line diagnostics that are to be 
rum in sequence to insure that if an error should cccur it 
will be detected at an early stage. 

NOTE: Additional diagnostics may be added in the future. 


The f1ve diagnostics are: 


1. OZDMC [REV] Basic W/R and Micro-processor tests 

e. OZDME [REV] DOCMP Line unit tests 

3. OZDMF (REV] BITSTUFF Line unit tests 

4. DZDMG [REV] CROM and Jump tests 

S. OZDMH [REV] Free-running tests (Heat test tape) 
REQUIREMENTS 

EQUIPMENT 

Boy POP11 family CPU (except an LSI-11) with minimum 8k memory 
ASR 33 (or equifivalent) 

DMC 1I-AR with DMCI1-DA cr DMC11-FA or 


OMCII-AL with DMC11-MA or OMC1I-MD 


POGE: 
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é.2 STORAGE 
Program will all 8K of memor ept where ABL anc 
Bootes tRAP LOABER Feasts. Locations 1886 Ru 1648; contain 
the “STATUS TABLE” information which 1s generated at start of 
diagnostics by manual input (questions) or automatically 
(au ay 6 This area is an overlay area and should not be 
altered by the operator. 
3. LOADING PROCEEDURE 
3.1 METHOD 
All rams are in absolute format and are loaded using the 


ro 
agsot ut LOADER. E: if the diagnostics are on a media such 
as DISK ,MAGTAPE,DECTAPE, or CASSETTE; follow instructions 
for the monitor which has been provided on that specific 
ABSOLUTE LOADER starting address #500 


MEMORY # SIZE 


Sik 17 
Sk 37 
Lk 57 
1&k 77 
20k 117 
mel 137 
28k 1S7 


3.1.2. Flace address of ABS loader into switch register. 
falsc place “HALT’ SW up) 


3.1.2 egress “LOAD ADDRESS’ key on console and release. 


S.i.5 Leprass “START KEY* on conssle and release (program should new 
be icading into CPU) 
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STARTING PROCEEDURE 


Set switch register to 000200 

gepress “LOAD ADDRESS’ key and release 

Set SWR to zero for ‘AUTO SIZING’ or SWR bitO=1 for manual 

input (questions) or SWR bit7=1 to use existing parameters 

set up by a previous start or a previously run DMCI1 

diagnostic. 

d. Depress "START KEY® and release. The program will type 
Maindec Name and or name (if this was the first start 

up of the program) and also the following: 


MAP OF DMC11 STATUS 


PC CSR STATL STAT2 STAT3 


ore 
. . . 


001500 160010 149310 177777 000000 
001510 160020 145320 177777 000000 


The program will type "R’ and proceed to run the diagnostic. 
The above is only an example. This would indicate the status 
tatle starting at add. 1500 in the program. In this example 
the table contains the information and status of two DMC11°S. 

THE STATUS TABLE MUST BE VERIFIED BY THE USER IF AUTO SIZING 

5, DONE. For information of status table see section 8.4 for 
lp. 


If the diagnostic was started with SWOQ=1 indicating manual 
parameter input then the following shows an example of the 
questions asked and some example answers: 


HOW MANY DMC11°S TO BE TESTED71 


01 

CSR ADDRESS? 160010 

VECTOR ADDRESS?310 

BR PRIORITY LEVEL? (4.5,.6,7)75 

DCcS MICRO-PROCESSOR HAVE CRAM? (Y OR NJN 

WHICH LINE UNIT? IF NONE TYPE “N, IF M8201 TYPE “I", IF 
IS THE LOOP BACK CONNECTOR ON?Y 

SWITCH PAC#1 (DOCMP LINE#)?377 

SWITCH PACw2 (8873 BOOT ADD) 7377 


Following the questions the status map is printed out as 
described above, the informaticn in the map reflects the 
answers to the questions. If the diagnostic was started with 
SWOO=0 and SWO7=0 (AUTO-SIZING) then no guestions are asked 
and only the status-map is printed out. { AUTO-SIZING is 
used the status information must be verified to be correct 
‘match the hardware). if it does not match the hardware the 
stognseis must be restarted with SWOO=] and the questions 
answered. 
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CONTROL SWITCH SETTINGS 
SW 1S Set: Halt on error 


SW 14 Set: Loop on current test 

SW13 Set: Inhibit error print out 

SW 12 Set: Inhibit type out/abell on error. 

SW 11 Set: Inhibit iterations. (quick pass) 

SW 10 Set: Escape to next test on error 

SW O09 Set: Loop with current data 

SW O8 Set: Catch error and locp on it 

SW O7 Set: Use previous status table. 

SW OG Set: Halt in ROMCLK routine before clocking 
micro-processor 

SW OS Set: Reserved 

SW O4 Set: Reserved 

SW O03 Set: Reselect DMCi1’s desired active 

SW De Set: Lock on selected test 

SW Ol Set: Restart program at selected test 

SW OO Set: Build new status table from questions. (If SWO7= 


and SWOO=0 a new status table is built by 
auto-sizing) 


Switch O& and O8-15 are dynamic and can be changed as needed 
while the diagnostic 1s running. Switches O0-O3 and switch O7 
are eb rete and are used only cn starting cr restarting the 
diagnostic. 
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SWITCH REGISTER OPTIONS (at start up) 


RESTART PROGRAM AT SELECTED TEST. It is strongly 

suggested that at least one pass has been made before 
trying to select a test, the reason being is that the 
rogram has to clerr areas and set Up parameters. 
hen this switch is used the diagnostic will] ask TEST 

NO.? Answer by typing the number of the test desired 
oe eth return to Begin execution at the selected 
est. 


LOCK ON SELECTED TEST. This switch when used with 
SWOl will cause the program to constantly loop on the 
selected test. Hitting any key on the console will 
let it advance to the next test and loop until a key 
is hit again. If SWO2=0 when SWOl is used. The 
program will begin at the selected test and continue 
normal operations. 


RESELECT DMC11’S DESIRED ACTIVE. Please note that a 
message is typed out for setting the switch register 
equal to DMC11”s active. this means if the system has 
four DMClls; bits 01,02,03 will be set in loc 
"DMACTV’ from the switch’ register. Using this 
switch(SWOO) alters that location;therefore if four 
OMClis are in the system *#*D0 NOt#ee set switchs 
greater than SW 03 in the up position. this would be 
a fatal error. do not select more active OMCI1s_ than 
there 1s information on in the status table. 


ms Load address 200 

B: Start with SW OO0=1 

C: Program will type message 

D: Set a switch or each DMC desired active. 
EXAMPLE: If you have 4 OMC’s but et want to 
run the first and the last set SWR bits O and 
3= 1. PRESS CONTINUE 

E: Number (IF VALID) will be in data lights 


(excluding 11705) 
Set with any other switch settings desired. 
BRESS CONTINUE. 
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DYNAMIC SWITCHES 
ERROR SWITCHES 


1 SWl2 Delete print out/bell on error. 
e. SW13 Delete error printout. 

J. SW 15 Halt on the error 

S. SW 08 Goto pegiesiog of the test(on error). 
S SW 10 Goto next test( 


SCOPE SWITCHES 


1. SWO6 Halt in  ROMCLK routine before clocking 
micro-processor instruction. This allows the 
: ar to scope a micro-processor instruction in 
static state before it is clocked. Hit 
os ontiane to resume running. 
é. SWO9 (if enabled by ’SCOP1’) on an error; If an ’#’ is 
piniee in —— of the test no. lex. #TEST NO. 
SWO3 incorporated in that test and 
ardiiere sod is usual | the best switch for the 
scope loop (SHlM=0, “Suid=0, SWO9=1, Suos=0). If 
not enabeled; and there a HARD fh errar 
(constant): SWOS is best. (SW Wi4e1, W19 
SWO9=0, SWOS=1). for intermittemt errors; SWi4= ci 
will loo .. eg reguardiess of error or not 
error. (SWI SW10=0, SWO9=0, SWO8=1,0) 
3. SW1l Inhibit taraiione. 
5. SHi4 Loop on current test. 


STARTING ADDRESS 


Starting address is at O0O200 there are no other starting 
addresses for the DMC11 diagnostics. (See Section 4.0) 


on error). 


NOTE: If address OOOO42 is non-zero the ram {ome it 
is under ACTLI1 or XXDP con and will act 
accordingly after all available BMC Li? $ tested the 
program gifl return to *XXDP° or “ACT-11° 


OPERATING PROCEDURE 
When program is initially started messages as described in 


section 4.0 will be printed, and program will begin running 
the diagnostic 
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PROGRAM AND/‘OR OPERATOR ACTION 
The typical approach should be 
1. Halt on error (via SW 1S=1) when ever an error occurs. 
c. Clear SW 15. 
J. Set SW 14: (loop on this test) 
4. Set SW 13: Cinhibit error print out) 


The TEST NUMBER and PC will be 4 a out and possibily an 
error message (this depends on the test) to give the operator 
an idea as to the source of the problem. If it is tog 
to know more information tonceraing the error report; LOOK I 
THE LISTING for that TEST NUMBER which was types guy and then 
NOTE THE PC of thE ERROR REPORT this way the EXACT FUNCTION of 
the test CAN BE DETERMINED. 


ERRORS 


B3 described previously there will slveys be a TEST NUMBER and 

P nyped cut at the time of an error (p eee 13=0 and SW 

12=03. in most cases additional information will be supplied 

s the the error message to give the operator an indication of 
@ error. 


ERROR RECOVERY 


If for some reason the ess | should “HANG THE BUS’ (gain 
control] of bus so that console manual functions are inhibited) 
an init or power down/up is necessary for operator to regain 
control cf cpu. If this should bappees look in location 
*TSTNO” (address L226) for the number 0 the test that was 
running at the time of the catastrophic error. In this way 
the operator will have an idea as to what the OMC11 was doing 
at the time of the error. 


RESTRICTIONS 
STARTING RESTRICTIONS 


See section 4. (PLEASE) 

Status table should be verified reguardless of how program was 
started. Also it is important to use this siBtiag along with 
the information printed cn the TTY to completly s8olate 
problems. 
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OPERATING RESTRICTIONS 


The i at tie DMCi1l diagnostic }3 loaded into core and run 
the +) US nace must be ofl up. his 1s done by manual input 
(SWOO=1) or by autosizing (SWOO=0 and SWO7=0). Thereafter 
however the status table need not be setup by subsequent 
restarts or even loading the next DMC diagnostic Because the 
ofartis TABLE is over fayed. he currént parameters in the 
STATUS TABLE are used when SWO7=1 on start up. 


HARDWARE CONFIGURATION RESTRICTIONS 


DMC1L1(MB200)- Jumper Wl must be in, and switch 7 of E76 must 
be in the OFF position. 


KMC(MB204)- Jumper Wl must be in. 


LINE UNIT(M8201)- Jumpers W1, We, and WY must be IN. Jumpers 
Boer read must be OUT. SWS of E26 must be in the ON 


LINE UNIT (M8202)- Jumper Wl must be in. SWS of Ec& must be 
in the OFF position. 


MISCELLANEOUS 
EXECUTION TIME 


All DMC11 device diagnostics will give an "END PASS” message 
(providing no errors and swle=0) within 4Ymins. This is 
assuming Quilt (DELETE ITERATIONS) 1s set to give the fastest 
possiblé execution. The actual execution time depends greatly 
on _ PDOP11 CPU configuration and the amount of memory in the 
system. 


PASS COMPLETE 


NOTE: EVERY time the program is started; the tests_will run 
as_ if SW1l (delete iterations) was up (=1). This is to 
“VERIFY NO HARD ERRORS’ as soon as possible. Therefore the 
first pass ~-EACH TIME PROGRAM IS STARTED- will be a “QUICK 
PASS’ until all DMC11’s in system are tested. When the 
diagnostic has completed a pass the following 1s an example of 
the print out to be expected. 


END PASS DZDMH CSR: 175000 VEC: 0300 PASSES: OC0001 
ERRORS: 000000 


NOTE: The pass count and error counts are cummulitive for 
each DMC11 that 1s running, and are set to zero only 
when the diagnostic is started. Therefore after an 
Gvernight run for a te the total passes and errors 
for each DMC11 since the diagnostic was started are 
reflected in PASSES: and ERRORS:. 
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KEY LOCATIONS 
RETURN (1214) 


NEXT (1216) 
TSTNO (1226) 


RUN (1316) 


DMCROO-DMCR17 
DMSTOO-DMST17 
(1500)-( 1640) 


DMACTY (1306) 


DMCSR (1404) 
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Contains the address where program will return 
when iteration count is reached or if loop on 
test is asserted. 


Contains the address of the next test to be 
peformed. 


Contains the number of the test now being 
peformed. 


The bit in "RUN’ always points to the DOMC11 
current] bein tested. EXAMPLE: (RUN) 
1302/000H000001000000'Means that DMCi1 no.06 
is the DMC11 now running. 


These locations contain the information needed 
to test up to 16 (decimal) DMClls sequentialy. 
they contain the CSR, VECTOR and STATUS 
concerning the configuration of each OMC11. 


Each bit set in this location indicates that 
the associated DMC11 will be tested in turn. 
EXAMPLE: (DMACTV) 1276/0000000000011111 means 
that DMC11 no. 00,01,02,03,04 will be tested. 
EXAMPLE: (DMACTV)’ 12767/0000000000010001 Means 
that DMC11 no. 00,04 will be tested. 

res jotas the CSR of the current DMC11 under 
est. 


"STATUS TABLE’ (1500-1640) 
The table is filled by AUTO SIZING or by the manual paramet 
¢ sly 


input (questions) as 


er 
scribed previously. Also if desired by 
) 


user; the locations may be altered by hand (toggled in) 
suit the specific configuration. 


The cpanel s status map shown below contains information for 
‘ste te C1l's. 


two DMC 


ble can contain up to 16 OMC11°S 


Following the map is a description of the bits for each map 


entry 


PC 


MAP OF DMC11 STATUS 


CSR STAT! STAT2 STATI 


001500 160010 145310 177777 9000000 
001510 160020 016320 90c00e o000000 
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Each map entr pon taiee iu words which contain the status 
information for . The PC shows where in core get 
the first of the 4 a. - if. In _ the gramp le. goers the firs 

DMC’S status is in locations, 1500, 1502 and 1506. The 
second OMC status is located at 15{0 15le, O81 4, a 1516. 

ot information contained in each 4 word. entry is defined as 
ollows: 


CSR: Contains DMC11 CSR address 


STATI: 
=] MICRO-PROCESSOR HAS CRAM 


UNIT at AN M8202 
S BNCLI BR PRIORITY LEVEL 


STAT2: LOW BYTE IS SWITCH PAC#1l (DDCMP LINE NUMBER) 
HIGH BYTE IS SWITCH PAC#e (BM873 BOOT ADD) 


STAT3: BITO=1 etsy FREE RUNNING TESTS ON KMC 
(MUST BE SET MANUALLY. SEE TEST 1) 
BIT1=0 DMC11-AR (LOW SPEED) 
BIT1=1 DMC11-AL (HIGH SPEED) 


mihi 
ws 
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METHOD OF AUTO SIZING 
FINDING THE CONTROL STATUS SEGISTER. 


The auto-sizing routine finds a DMC11 as follows: It starts 
at address 160 and tests all address in increments of 10 up 
to and including address 167760. If the address does not time 
out, the pi pentes is done, the first CROM address is written 
to a 1252S2 then it is read back. If it contains a -1l or 
1252S2 or a 626 or 16520 a DMC11 or KMC11 has been found, if 
not, the address is updated by 10 and the search continues. A 
-1 indicates a DMC11 with no CROM, a 125252 indicates a KMCI1 
with CRAM, a 626 indicates a DMCII-AL and a 16520 indicates a 
DMC11-AR. Further tests are performed at this point to 
determine which line unit, if any, is installed, if a 
loop-back connector is installed and various switch settings 
on the line unit. THIS IS WHY THE STATUS E 

VERIFIED BY THE USER AND IF ANY OF THE INFORMATION DOES NOT 
AGREE WITH THE HARDWARE THE DIAGNOSTIC MUST BE RESTARTED AND 
THE QUESTIONS MUST BE ANSWERED. All DMC11’s in the system 
will be found by the auto-sizer. If it does not find a ll 
the diagnostic must be restarted and the questions answered. 


FINDING THE VECTOR AND BR LEVEL 


The vector area (address 300-776) is filled with the 
instruction IOT and °’.42’ (next address). The processor 
status is started at 7 and the DMC is programmed to interrupt. 
The PS is lowered by 1 until the interrupts, a avion is 
made and if no interupt occures at PS level 3 (because of a 
bad DMC11) the program assumes vector address 300 at BR level 
S and the problem should be fixed in the diagnostic. Once the 
problem is fixed; the program should be re-setup again to get 
correct vector. If an interupt occured; the address to which 
the OMC11 interupted to is picked up and reported as the 
vector. NOTE: if the vector reported is not the vector set 
up by you; there is a problem and AUTO SIZING should not be 
one. 


SOFTWARE SWITCH REGISTER 


If the diagnostic is run on an 11/04 or other CPU without a 
switch register then a software switch register is used to 
allow user the same switch options as described previously. 
If the hardware switch register does not exist or if one does 
and it contains all ones (177777) this software switch 
register is used. 


Control: 

To obtain control at any allowable time during execution of 
the diagnostic the operator types a CTRL G on the console 
terminal keyboard. As soon as the CTRL G 1s recognized, by 
the diagnostic, the following message will be displayed: 
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SWR=XXXXXX NEW? 


Where XXXXXX is the current contents of the software switch 
register in octal. The software contro] routine will then 
await operator action. At which time the rnc is required 
to type one or more of the legal characters: 1) 0-7, 2) 
line teea(<LF>), 3) carriage return(<CR>), or 4) control-U 
(CTRL U). No check is made for legality. If the input 
character is not a <LF>, <CR>, or CTRL U it is assumed to be 
an octal digit. 


To change the contents of the SSR the operator ptnety types 
the new desired value in octal - poenien zeros need not be 
typed. And terminates the input ~— with a <CR> or <LF> 
ag eee on the program action desired as described below. 
The input value will be truncated to the last 6 digits nares. 
At least one digit must be typed on any given input string 
prior to the terminator before a change to the SSR will occur. 


When the input string is terminated with a <CR> the diagnostic 
will continue execution from the point at which it was 
interrupted. If a <CR> is the only thing typed the program 
will continue without changing the SSR. The <LF> differs from 
the <CR> by restarting the program as if it were restarted at 
address 200. 


If a CTRL U is topes at any point in the input string prior to 
the terminator the in a value will be disregarded and the 
prompt displayed (SWR = XXXXXX NEW?). 


To set the SSR for the starting switches, first load the 
diagnostic, then hit CTRL G, then start the diagnostic. 
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COPYRIGHT 1See, DEGITAL Bout BN nico Be Th YRARO, MASS. 01754 


BREE RUNNING FLAG MODE DAT a tee ] RERRHSRAALSRARLALES ERA AL ELE 


neni 
THE RECEIVED DATA 


CINE UN as FOR tu Rakin NG AND ARE PERFORMED 


ALL FOUL Ou e 

ONLY bie unit + a YOU WISH TO PERFORM 
oTESE FREE KMC (NORMALLY THE FREE +; foci TESTS 

WILL tex ON wh me, t Tie TIMER {5 190 yi THEN YOU 

MANUALLY STATUS MAP. ALSO T 
MUST HAVE L Y Y RUNNI 

DZDMG TEST 2 ge THEN LOADING AND STARTING OZDMH 
WITH SWITCH 7 = 

SHALLLSAAAARAERESHESREESES TEST OC RRRERARRREERERSELEE ELLE LES 


UN TES 
N FREE RUNNING MODE SEND MESSAGE WITH NO RECEIVE 
BUFFER AVAILABLE, VERIFY THAT AN OVERRUN ERROR OCCURS 


ca” + ee TEST 3 HeREREERSERAEER ESSE SEER EELS 
IN FREE RUNNING MODE SEND A MESSAGE LONGER THAN THE RECEIVE 
BUFFER, VERIFY THAT A LOST DATA ERROR OCCURS. 
eer ee TEST 4 SeRRRREELERRSSR SSE S SESE ERTS 


TE 
Ik FREE RUNNING MODE, LOAD A TRANSMIT BA THAT WILL TIME OUT 
VERIFY THAT A NONLEXISTENT MEMORY ERROR OCCURS 


ERELLSESERAEAEEERERERRELES TEST S REeEHeReREREAREREER EERE EEE 
RECEIVE NON-EXISTENT MEMORY TE 
VE_BA THAT oe TIME OUT 


IN FREE RUNNING MODE, LOAD A RECEI 
VERIFY THAT A NONLEXISTENT MEMORY ERROR OCCUR 
PROCESSOR ERROR TEST. TEST & RHRRERRRRRRERERRERE REE AE SES 


IN FREE RUNNING MODE, DO A BASE TRANSFER REQUEST AFTER A 
BASE HAS BEEN SET UP, VERIFY THAT A PROCESSOR ERROR OCCURS. 


SEMECEOR ERROR IEGT TEST 7 SHRHEEERFHRAHSEEASLEREAARES 


PROCESSOR ERROR T 
IN FREE RUNNING MOBE DO A ROI WITH AN ILLEGAL 10 CODE 
VERIFY THAT A PROCESSOR ERROR OCCURS 


SERESLERRERRREERERREREESES TEST 1D Skee eke ke eeee er eeeaseeeeeee 
HALF DUPLEX TEST 

IN FREE RUNNING MODE, SET HALF DUPLEX AND L U LOOP 

SEND A MESSAGE AND VERIFY THAT THERE ARE No BONES 
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LEAAARERARRRERRRRRRRAESEER TEST 1] RRRRRRRERERAAEEEA ESSE EAE SED 


SUME TEST 
THIS TEST SENOS AND RECEIVES A BUFFER ry SHUTS DOWN THE 
DMC. THEN A MASTER CLEAR IS ISSUED AND A BASE WITH RESUME 
BIT SET IS GIVEN, ANOTHER BUFFER IS SENT AND RECEIVED. 
DATA IS CHECKED. 


JUMUHHHHHHHHHHHHHHHHEEEE TEST 12 he ag to pele 
FREE RUNNING DATA TEST CINTeNmueT DRIVEN DERCIZER) 
ie TEST REPEATEDLY QUEUES UP 7 RECEIVE BUFFERS A 
TRANSMIT BUFFERS AND CHECKS DATA WHEN ALL 7 BUFFERS 
ARE RECEIVED. TRANSMIT COUNTS RANGE FROM 2 iy 104. 
DATA IS A BINARY COUNT PAT T 


TERN. THE RESUME FUNCTION 
IS CHECKED IN THIS TEST. THIS TEST USES THE ae CONNECTOR 


IF IT IS PRESENT, OTHERWISE LINE UNIT LOOP IS 
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DEDWH . MACYL1 30;1048) 14-JUL~77 12:32 PAGE 2 PAGE: 017 
SSOMH.P 1o=M INTRODUCTION TO DMC11 DIAGNOSCTIC 


; #MAINDEC-11-DZDMH-B  _OMC11 FREE RUNNING TESTS 
; #COPYRIGHT 1976, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 


1 
é 
3 
4 
5 
5 
16 ;STARTING PROCEDURE 
it ; LOAD AM 
12 :LOAD ADDRESS 
13 *SWR=O AUTOSIZE DMC11 
14 :SWO7=1 USE CURRENT DMC11 PARAMETERS 
15 supOs! IN INPUT NEW DMC11 PARAMETERS 
1? : PROGRAM TLL TYPE “MAINDEC-11-DZDMH-B DMC11 FREE RUNNING TESTS” 
18 !PROGRAM WILL TYPE STATU 
is :PROGRAM WILL TYPE “R™ TO INDICATE THAT TESTING HAS STARTED 
20 !AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 
21 SAND THEN RESUME TESTING 
ee : SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE 
cJ 
24 
2s 
2E 
=? ;SWITCH REGISTER OPTIONS 
es 
30 100000 Sw1S=100000 :=1,HALT ON ERROR 
31 049000 €1114=40000 :=1’LOOP ON CURRENT TEST 
32 SwW13=20000 :=1) INHIBIT ERROR T 
33 010990 SWi2=10000 :=1; DELETE THPEOUT BELL” ON ERROR. 
34 Swi 1=4000 :=]’ INHIBIT ITERATION 
35 902000 5wW10=2000 :=1, ESCAPE TO NEXT Test oN ERROR 
3 001000 SwO9=1000 :=1,LOOP WITH CURRENT DAT 
37 990400 Swog=400 :=1/LOOP ON ERRO 
38 900200 SwO7=200 :=]'USE CURRENT DMC11 PARAMETERS. =C.AUTOSIZE OMC!! 
39 000100 SW06=100 '21' HALT BEFORE CLOCKING MICRO-PROC goers INSTRUCTION 
ee ee 
42 909019 SWO3=10 :RESELECT DMC11°S TO BE TESTED (ACTIVE) 
43 900004 SwOe=4 :LOCK ON TEST SELECT 
~ og090e2 SwOl=2 :RESTART PROGRAM AT SELECTED TEST 
st 92000; Swod=! : INPUT DMC11 PARAMETERS 


FOe2 
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DIOMH.P11 ©. 1S=MAY-77 09:54 GENERAL DEFINATIONS AND EQUIVALENCIES 
46 
4> 
48 sREGISTER DEFINITIONS 
50 , 
51 oo00000 RO=%0 :GENERAL REGISTER 
2 9009001 Rl=%1 GENERAL REGISTER 
53 ocoode R2=%2 GENERAL REGISTER 
54 900003 R3=%3 ;GENERAL REGISTER 
5s 990004 R4=%4 GENERAL REGISTER 
cé 909905 RS=4S ; GENERAL REGISTER 
7 090006 SP=%6 “PROCESSOR STACK POINTER 
= 090007 PC=%7 !PROGRAM COUNTER 
=) 
eC ;LOCATION EQUIVALENCIES 
& § meme moo eooonseeseonen= 
&2 
£3 177776 PS=177776 :PROCESSOR STATUS WORD 
e4 601290 STACK=1200 !START OF PROCESSOR STACK 
bE s INSTRUCTION DEFINITIONS 
( 5 eran ELD 
68 
= 905746 PUSHISP=S746 ;DECREMENT PROCESSOR STACK 1 WORD 
70 005726 POP 1SP=S726 i INCREMENT PROCESSOR STACK | 1 HORe 
010046 PUSHRO=10046 § :SAVE RO 
72 012600 POPRO= 12600 :RESTO RO PROM TACK 
? PUSH2SP=24646 sDECRERENT STACK TWICE 
74 022626 POP2SP=22626 NCREMENT STACK TWICE F 
5 -EQUIV EMT,HLT :BASIC DEFINITION OF ERROR CALL 
7 :BIT DEFINITIONS 
78 { Cowerewesencene 
80 109000 BIT1S=10000 
81 00 BIT14=40000 
ge 92000 B1T13=20000 
83 910000 BIT12=10000 
a4 004000 81T11=4000 
a5 092000 81T10=2009 
26 901000 81T9=1000 
97 900400 81T8=400 
92 900200 BIT7=200 
g3 000190 81T6=100 
96 o00040 BITS=40 
$1 000 BIT4=29 
32 00001 BIT3=10 
33 900094 BITD=4 
34 oos0d2 BITl=2 
Ss ococo; BIT0=1 


~, 
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DZDMH. PL} 18-MAY-77 09:S4 TRAPCATCHER FOR UNEXPECTED INTERUPTS 


5 1 RRRRSLELELESS SSE SS ESL LAL ALAA ALA SRAERELALELAL ALAS ASS SALAS ASS AALS 


I a a a SK KKK KKK KKK KKK KKK KKK KKK KKK Kee eee eee me 
te ‘ : TRAPCATCAER FOR ILLEGAL INTERRUPTS 
102 “THE STANDARD “TRAP CATCHER” IS PLACED 
103 “BETWEEN ADDRESS O TO BODE ESS 7 76. 
igs ‘IT LOOKS LIKE “PC+2 HALT” 
hi, faeces mA fo SoS ea 
158 oog00 20 
igs STANDARD INTERRUPT VECTORS 
lll ‘ 
112 900024 224 
113 000024 005336 -PFAIL -POWER FAIL HANDLER 
114 900026 900340 340 “SERVICE AT LEVEL 7 
115 000030 Oo047S0 “HLT ERROR HANDLER 
116 000032 000340 340 :SERVICE AT LEVEL 7 : 
117 900034 004716 " TRPSRV : GENERAL HANDLER ofsParcH SERVICE 
118 000036 900340 340 ‘SERVICE AT LEVEL 
113 000040 240 SVE 08 oo 
ue vURe 
is? BaBRYS §=BaREeR 5 RETURN ay i uNOER A ACT=11 OR XXDP 
122 900044 oop0000 0 {SAVE FOR ACT xO 
ig3 o00046 ag 35 ee SENDAD ‘20R USE WITH 410 fh OR XXDP 
124 ve .2S2 
125 po00S2 oo0000 sACT-11 PROGRAM CHARACTERISTIZS 
127 900174 . 
128 000174 Odod0o0 OISPREG:0 :SOFTWARE DISPLAY REGISTER 
129 000176 oo0c08 SWRES: 0 SOFTWARE SWITCH REGISTER 
131 o00200 2200 
78 oco205 900137 coeoc2 IMP “START -GO TO START OF PROGRAM 
134 
135 901000 21090 
136 01000 006377 o40515 047111 MTITLE: ASCII <377><12> ‘MAINDEC-11-DZDMH-B «377 
2) 901025 194 O41515 O3046! "ASCIZ /DMC1L FREE RUNNING TESTS. «377 
13 001200 .=1200 
133 s INDIRECT POINTERS 70 SWITCH REGISTER ANC LIGHT DISPLAY 
ates ° OOOO S SOS OSES OSS SOS OS OS 8S OSS SOO SO SS BESO OSS S SASSO ODOT SOO 
141 
142 901200 177570 DISPLAY: 177570 
143 SCle0e 177570 177570 


HOe 
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DZDMH. P11 1S-MAY-77 09:54 PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 
144 
e s INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 
14? , 
14@ 001204 177560 TKCSR: 177560 ; TELETYPE KEYBOARD ale REGISTER 
149 001206 177562 TKDBR: 177562 : TELETYPE KEYBOARD DATA BUFFER 
150 O01210 177564 TPCSR: 177564 : TELEPRINTER CONTROL REGISTER 
13 OCl212 177566 TPDBR: 177566 : TELEPRINTER DATA BUFFER 
hr ;PROGRAM CONTROL PARAMETERS 
155 ‘ 
1568 001214 9Q00000 RETURN: O 3 acore cee FOR LOOP ON TEST 
t= mises ooo000 Wt 0 ‘ADDR +. 2 NEXT ye le BE ath ED 
es ue H 
128 Boisse Soong eotar: 3 oes of ITERATIONS THT C cues TEST WILL 2€ 
160 O0le24 o00000 LPCNT: QO : NUMBER OF ITEREATIONS COMPLET 
161 OOi226 o00000 TSTNO: 9 sNUMBER OF TEST IN 
lée O001e30 o00000 PASCNT: OQ i NUMBER OF PASSES one ED 
163 9001232 900000 ERRCNT: O ; TOTAL NUMBER OF ERR 
Fe 001234 o00000 LSTERR: O = PC OF LAST ERROR CALL 
1b ;PROGPAM VARIABLES 
168 : 
1689 001236 000000 STRTSW: O -SWITCHES AT START OF PROGRAM 
170 001240 o00000 STAT: 0 : OM STATUS WORD STORAGE 
171 OOle4%2 290000 CLKX: 0 
172 oO0le ooooo0 MASKX: QO 
173 O01 000000 TEMP1: ; TEMPORARY aT ORE 
174 O01 000000 TEMPe: ite MPORARY 
1 12S2 000000 TEMP3: O MPORARY | Wy | 
176 901254 900000 TEMPY: 0 TEMPORARY S10R ace 
1 001256 TEMPS: 0 i ig ae TORAG 
178 1260 000000 SAYRO: QO 
179 leb2 oo0000 SAVRI: O a 2 TORAGE 
1 301.264 AVRe: : :R2 STORA 
181 O01 AVR: :R3 STORAG 
182 001270 SAVRY: OO :RM ety ae 
183 001272 0000 AVRS: iRS ay 
184 001274 0000 AVSP: : STACK BB PATER STORAGE 
185 001276 SAvPC: O :PROGRAM COUNTER STORAGE 
186 001300 ZERO: 9 
187 001302 9o0000! ONE: 1 
188 001304 MEMLIM: 0 HIGHEST LOCATION FOR NPR'S 
i tit 000001 tepey _ : sOAC LT" San ae wares 
191 O0131e 0001 SAVACT: .BLKW I ORIG NAL Bory ae es 
192 901314 00000! SAYNUM: .BLKW 1 WORKABL 
ia 001316 a8 0 “POINTER 10 eSNG DEVICE. 
195 001320 001472 CREAM: 0M. MAP-& TABLE POINTER. 
196 001222 O01E7E MILK: CNT. MAP-4 : TABLE POINTER 
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001330 
001330 
001332 
001334 
001336 
001340 
001342 
001344 
001346 
001350 
001352 
001354 
001356 
001360 
001362 
001364 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


I0e 


;PROGRAM CONTROL FLAGS 


INIFLG: .BYTE 


ERRELG: BVT 
LOKFLG: YT 
QV.FLG: .BYTE 
. EVEN 


;PROGRAM INITIALIZATION FLAG 
;ERROR OC URED FLA 
;LOCK ON CUR 44 TEST FLAG 


;QUICK VERIFY 


FLAG. 
ON FIRST PASS OF EACH OMC11 ITERATIONS WILL SE 


;DEFINITIONS FOR TRAP SUBROUTINE CALLS 


TR TNTEYadce URRCHTA 


*TRPTAB: 
SCOPE=TRAP+0 

. SCOPE 
SCOP 1=TRAP+ 
TYPE=TRAP+2 

. TYP 
INSTR=TRAPS 
INSTER=TRAP+4 
PARAM=TRAP+S 

ARAM 

SAVOS= = TRAP +6 
RESOS=TRAP+7 
CONVRT= =TRAP +10 
CNVRT=TRAP+i1_ 

“CNVRT 
MSTCLR= = TRAP+ 12 
DELAY=TRAP+13 

. DELAY 
ROMCLK=TRAP+14 


, K 
DATACLK=TRAP+15 
CLK 


TIMER=TRAP+16 
. TIMER 


: SESE SLELASLLTEAERELELFAAFLFSFRELLLFRALRARARLSSLFLLAAATTAAPLAFLRAALSEPLSSE 


TO SCOPE LOOP AND ITERATION HANDLER 
TO LOOP ON CURRENT DATA HANDLER 

TO TELETYPE OUTPUT ROUTINE 

TO ASCII STRING INPUT ROUTINE 

TO INPUT ERROR HANDLER 

TO NUMERICAL DATA INPUT ROUTINE 
REGISTER SAVE ROUTINE 

REGISTER RESTORE ROUTINE 

DATA OUTPUT ROUTINE 

TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
ISUE A MASTER CLEAR 


TO 
TO 
TO 


NES CAN 
TLY 


DELAY 
CLOCK ROM ONCE 
CLK DATA 


DELAY A CLOCK TICK 


OLL ING TH THE DEFINITIONS 
pt RRR RARER RARER REESE EEE ER AE EERE RAS E EERE RARER SEES SEES ESE 
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AGE 7 
PROGRAM PARAMETERS, VARIABLES, 


J0e 


AND TRAP CALLS. 


PAGE: 


;DMC11 CONTROL INDICATORS FOR CURRENT DMC11 UNDER TEST 


set 
me 


;0MC11 VECTOR AND REGISTER INDIRECT POINTERS 


.=1500 

DM. MAP: 

DMCROO: .BLKW 

OMS100: .BLKW 

DMS200: .BLKW 
300: .BLKW 


OMS30e: . BLKW 
DMCRO3: .BLKW 


DMS303: .BLKW 
DMCROY: .BLKW 


OMS304: .BLKW 


a or — > pe — — -— > > — > > 


33RD STATUS WORD 


B19 Be 


BERVICE PS 
+ eevee 


BoRT REGISTER % 


;CONTROL STATUS REGISTER FOR DMC11 NUMBER CO 
VECTOR FOR DMC11 NUMBER 0 


MP _LINES 


0 
: DOC FOR DMC11 NUMBER OC 
:3RD STATUS WORD 


3 CONTROL STATUS oe FOR OMCil NUMSER C1 


;VECTOR FOR DMC1 
MP _LI 


NE® FOR DMC11 NUMBER O1 


; DDC 
:3RD STATUS WORD 


;CONTROL STATUS REGISTER FOR DMC11 NUMBER C2 
;VECTOR FOR DMC11 NUMBER O2 
MP LIN yt DMC11 NUMBER C2 


:DDC 
;3RO STAT 


; CONTROL aan REGISTER FOR OMC1i NUMBER O03 


; VECTOR FOR 
;00C 


MC11 R 
CMP_LINE® FOR DMC11 NUMBER 03 
WORD 


:3RD STATUS 


;CONTROL STATUS REGISTER FOR DMC11 NUMSER O04 


VECTOR FOR DMC11 NUMBER O4 
;DOCMP_LINE® FOR OMC11 NUMBER 04 


022 


KO0e 
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304 001550 000001 DMCROS: -BLKM l ;CONTROL STATUS REGISTER FOR DMC11 NUMBER CS 
ee $s 
abe Beleeg BBBSRI mega: -B ot EYRE TOR, £QR DNC NUMBER ORR Os 
307 001556 000001 OMS30S: .BLKW 1 :3RD STATUS WORD 
303 001560 000021 06: .BLKW 1 ; CONTROL STATUS REGISTER FOR DMC11 NUMBER D6 
311 OO1se4 | OO00I1 Drsi0e: ‘BW Sa a 
es gee Ss « 
a3 001 aie at 25 Be: -BLKW ol : 3RD ME TATUS WORD 
314 001570 o00001 DMCRO7: .BLKW 1 s CONTROL on Boe REG GISTER FO FOR DOMC11 NUMBER 27 
1S 001572 900 MS107: .BLKW 1 ‘VECTOR FOR 
te BRtess §=BpReHt presae: "BLKW i BBE mkt OP on DMC11 AURBER 07 
317 001576 900001 DMS307: .BLKW 1 ‘SRO STATUS ORD 
319 001800 o00001 CR10: .BLKW 1 :CONTROL STATUS REGISTER FOR DMC11 NUMBER 10 
3e0 001602 900091 OMS110: .BLKW 1 :VECTOR FOR DMC11 NUMBER 10 
321 001694 900001 prise10: LKW 1 :DOCMP LINE® FOR DMC11 NUMBER 10 
see 001606 o00001 OmS310: KW :3RD STATUS WORD 
324 001610 000001 OMCR11: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER 11 
325 001612 000001 OMS111: .BLKW 1 ‘VECTOR FOR OMC11 NUMBER 11 
30H 001614 O00001 DMS211: .BLKW 1 :DDCMP LINE® FOR DMC11 NUMBER ll 
307 001616 000001 OMS311: .BLKW 1 : 3RD STATUS WORD 
329 001620 oo0001 DOMCR12: .BLKW 1 :CONTROL STATUS REGISTER FOR DMC11 NUMBER 12 
330 001622 000001 DMSlle: .BLKW 1 i VECTOR FOR DMC11 NUMBER le 
331 001624 900001 OMS212: .BLKW 1 :DDCMP _LINE® FOR DMC11 NUMBER i2 
$3 001626 000001 OMS3le: .BLKW 1 : 3RD STATUS WORD 
334 001630 000001 OMCR13: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER !2 
335 001632 o00001 OMS113: .BLKW 1 “VECTOR FOR DMC11 13 
336 001634 900001 OMS213: .BLKW 1 :DOCMP LINE® FOR OMCIT NUMBER 13 
337 001636 00000: OMS313: .BLKW 1 :3RD STATUS WORD 
339 001640 o00001 OMCR14: .BLKW 1 sCONTROL STATUS REGISTER FOR DMC11 NUMSER 14 
340 001642 990001 OMS114: .BLKW 1 ;VECTOR FOR OMC11 NUMBER 
341 644 900001 OMS214: .BLKW 1 DOCMP LINE® FOR DMC11 NUMBER 14 
aie 001646 01 OMS314: .BLKW 1 :3RD STATUS WORD 
344 001650 01 OMCRIS: .BLKW 1 :CONTROL STATUS REGISTER FOR DMC11 NUMBER !5 
34S 001652 000001 OMS11S5: .BLKW 1 : VECT QR FOR OMC11 R 
a6 001654 900001 DMS215: .BLKW 1 : DOCMP # FOR DMC11 NUMBER 1S 
ai2 1 OMS315: .BLKW 1 : 3RD STATU WORD 
349 001660 1 DMCRI6: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMCil NUMBER 16 
350 000001 OMS116 KWo VECTOR FOR DMC11 
35] 001664 000001 OMS216: .BLKW 1 t OBCMP LINE® FOR DMC11 NUMBER 16 
352 001666 000001 OMS316: .BLKW 1 : 3RD STATUS WORD 
354 001670 000001 DMCRI7: .BLKK 1 :CONTROL STATUS REGISTER FOR DMC11 NUMBER 17 
=o Gein peel Ment: “au | Birr free Pag ones T tune 1° 
ue ive a ¢ 
357 OO1E7E aap pmo at? ptt 1 :3RD ST iN ma 


353 001700 000000 OM.END: 000000 


LOe 
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DZDMH.P11  16-NAY-77 09:54 PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 
0 
eg :DMC11 PASS COUNT AND ERROR COUNT TABLE 
363 F 
364 001702 CNT. MAP: 
365 001706 00 PacToo: 0 PASS COUNT FOR DMC11 NUMBER 00 
3b 1704 aa) ERCTOO: O ‘ERROR COUNT FOR DMC11 NUMBER OO 
368 001706 00000 PACTO1: O PASS COUNT FOR DMC11 NUMBE 
368 001710 do0000 ERCTOL: O ZERROR COUNT FOR DMC11 NURBER” 1 
371 001712 000000 PACTO2: 0 PASS COUNT FOR DMC11 NUMBER 02 
372 001714 900000 ERCTOe: O “ERROR COUNT FOR DMC11 NUMBER C2 
374 001716 000000 PACTO3: O PASS COUNT FOR DMC11 NUMBER 03 
37 001720 o00000 ERCTO3: O "ERROR COUNT FOR DMC11 NUMBER 03 
77 001722 OO PACTOY¥: 0 PASS COUNT FOR DMC11 NUMBER O04 
376 obi 584 Mudued ERCTOY: O ERROR COUNT FOR DMC11 NUMBER O4 
380 001726 000000 PACTOS: 0 PASS COUNT FOR DMC11 NUMBER OS 
381 001730 o00000 ERCTOS: O :ERROR COUNT FOR DMC11 NUMBER OS 
383 001732 000000 PACTOb: O PASS COUNT FOR IMC11 NUMBER 06 
384 001734 oo0000 ERCTOG: O ‘ERROR COUNT FOR DMC11 NUMBER 06 
386 001736 000000 PACTO?7: 0 PASS COUNT FOR DMC11 NUMBER 07 
387 061740 oo0000 ERCTO?7: 0 ‘ERROR COUNT FOR DMC11 NUMBER 07 
389 001742 000000 PACTIO: 0 PASS COUNT FOR DMC11 NUMBER 10 
390 001744 900000 ERCTIO: O ERROR COUNT FOR DMC11 NUMBER 10 
392 001746 000000 PACT11: 0 PASS COUNT FOR DMC11 NUMBER 11 
383 001750 oo0000 ERCT11: 0 ERROR COUNT FOR DMC11 NUMBER 11 
395 001752 gaono9 PACT12: 0 PASS COUNT FOR DMC11 NUMBER 12 
386 001754 90000 ERCTle: 0 ZERROR COUNT FOR DMC11 NUMBER 12 
398 001756 ooo0c0 PACT13: 0 PASS COUNT FOR DMC11 NUMBER 1 
333 001760 o00000 ERCT13: O ERROR COUNT FOR DMC11 NUMBER 33 
401 001762 oD0000 PACTI4: 0 PASS COUNT FOR DMC11 NUMBER 
102 001764 O00000 ERCTI4: 0 tERROR COUNT FOR DMC11 NUMBER. 4 
404 001766 o00000 PACTIS: 0 PASS COUNT FOR DMC11 NUMBER 15 
195 001770 oo0000 ERCTIS: 0 ERROR COUNT FOR DMC11 NUMBER 15 
407 001772 oD0000 PACTI6: 0 PASS COUNT FOR DMC11 NUMBER 16 
498 001774 oo0000 ERCTI6: O ERROR COUNT FOR DMC11 NUMBER 16 
410 001776 oog000 PACTI7: O sPASS COUNT FOR DMC11 NUMBER 1 
411 02009 900000 ERCT17: O ‘ERROR COUNT FOR DMC11 NUMBER 1? 


ee ee me oe 
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ARAMETERS, VARIABLES, AND TRAP CALLS. 


PAGE: 


FORMAT OF STATUS TABLE 


1S 14% 13 12 11 10 O93 O8 O7 O& OS OY O3 C2 OL OO 


I I 
: . 8.8.5 8.8.4 pk. a Pe Pe Pe ee i CSR 


[4-2 OM 2... £6.08 8. £8 £8 
CSCO EeT PL eOCaet ere? 8. FF Ce. tLe STATI 
Qe See Me Oe ee I 


I I I 
i * 6 f ef FF 6 : , . 2 eee e # : STAT2 


ae oe ee SE aS ee 
Ile] #1 STAT3 
a. = 8 


CSR: CONTAINS DMC11 CSR ADDRESS 


STATI: S$ 00-08 IS DMC11 VECTOR ADDRESS 

=1 Stak peneeeae HAS CRAM 

CRO-PROCESSOR HAS CROM 
URNAROUND oa IS ON 


MWWtCUTU 
URI RIS Ieee 
—— OOO 
G-- 
re) 

wo 

F a 


mss 


eer) 
+ 


STAT2: LOW BYTE IS SWITCH PAC#1 (DDCMP LINE NUMBER) 
HIGH BYTE IS SWITCH PAC#2 (BM873 BOOT ADD) 


STAT3: BITO=1 DO ret o's TESTS a KMC 
ta BE SET TO A ONE UALLY [PROGRAM DZDMI ONLY}) 

MC MUST a MICRO-CODE WRITTEN FROM RUNNING 

DZDMG TEST 2 FIRST 

BIT1=i DMC11-AL LOCAL HIGH SPEED MICRO-CODE 

BIT1=0 DMC11-AR REMOTE LOW SPEED MICRO-CODE 


0025 


NOe 


DZDMH MACYLI 30(1046) L1-JUL-77 12:32 PAGE 11 PAGE: O02 
DZDMH.P11  16-MAY-77 09:54 PROGRAM INITIALIZATION AND START UP. 
4 :PR INITIALIZATION 
a LOCK OUT HT ERR B TS | 
me ta TD POUR Feil VECT 
47. REAR” Progra Cah TROL PRacs AND COUNTS 
474 ‘TYPE TITLE MESSAGE 
476 002002 012737 000340 177776 .START: MOV #340,PS sLOCK OUT_INTERRUPTS 
477 002010 016705 MOV seTaeK SP EOF UP STACK 
we Opens GLara? GOLSIG Gori RG Rn!) | ‘See meek or dives te San 
480 010016 CLR SWFLG eC ER SOFT TYPEOUY FLAG 
481 002034 105037 001325 CLRB = ERRFLG CLEAR E 
482 002040 105037 001327 CLRB «QV. FLG *ZERO QUICK VERIFY FLAG 
483 002044 012737 001470 001320 MOV #0M.MAP-10,CREAM:GET MAP POINTER. 
484 O0020S2 012737 001676 001322 MOV #CNT.MAP-4’MILK ;GET PASS COUNT MAP POINTER 
485 002060 012737 100000 001316 MOV #81T1S.RUN ‘POINT POINTER TO FIRST DEVICE. 
486 002066 012700 001702 MOV SCNT. MAP, R :PASS COUNT POINTER TO RO 
487 002072 005020 23$: CLR (RO)+ CLEAR TABLE 
488 002074 O22700 o0200e2 CMP SCNT.MAP+109,RO ;DONE YET? 
489 002100 001374 ; KEEP GOING 
4990 002102 005037 001234 CLR LSTERR ‘CLEAR LAST ERROR POINTER 
491 002106 012737 000001 001226 MOV #1, TSTNO :SET UP FOR TEST 1 
492 002114 012737 OO0e002 O01214 MOV #.START,RETURN :SET UP FOR POWER FAIL BEFORE 
493 TESTING STARTS 
494 002122 013746 OO0006 MOV 386, -(SP) :SAVE CURRENT VECTORS 
We GOL OLe3? bosiee 000004 2 2 SET UP FOR TIMEOUT 
é ; 
497 B05 140 0127 006188 001202 MOV $127070, SHR SET SWR A HARD SWR ADDRESS 
498 002146 012737 177570 001200 MOV #177570. DISPLAY ;SET DISPLAY TO HARD SWR ADDRESS 
499 oes 082777 177777 177020 CMP #-1, JSWR ‘REFERENCE HARDWARE SWITCH REGISTER 
S00 162 001402 BEQ 6$+2 *IF = -1 USE SOFT SWR ANYWAY 
S01 002164 000407 BR 7$ IF IT EXISTS AND NOT = -1 USE HARD SWR 
S02 O0e16S Oecbeb 6S: CMP (SP)+. (SP)+ ‘ADJUST STACK 
cm mele pier GON Bole RY SGLSSNOrsetaviPSHNTER 1 S067 Bihuay nc 
50s pts7 35 ppp hod 7$: MOV (Bp #4 RESTORE VECTORS 
506 002210 012637 000006 MOV (SP)+' au : 
507 214 105737 001324 TSTB NIFLG :HAS INITIALIZATION BEEN PERFORMED 
508 220 001006 BNE :BR IF 
509 022737 003522 oo004e CMP 8SENDAD,a842 ;IF ACT-11 AUTOMATIC MODE, DON’T TYPE ID 
ei? Bossa | odupS 1000 BER MTITLE TYPE TITLE MESSAGE 
zis Bosse 0047 606 208:  #$ JSR Pc, CKSWR “CHECK FOR SOFT SWR 
513 2 017737 176734 001236 MOV aSWR, STRTSW ‘STORE STARTING SWITCHES 
S14 002250 737 o00042 TST aete IS IT RUNNING IN AUTO MODE? 
51S 002254 001402 ; BEQ +6 :BR IF NO 
S16 256 005037 001236 CLR STRTSW :IF YES, CLEAR SWITCHES 
617 737 O00001 001236 BIT BSWOO,STRTSW IF SWOO=1, QUESTIONS ARE ASKED. 
518 1012 BNE 17$ ‘BR IF SWOO=1 
513 002272 105737 001236 STB STRTSH sBITZ=12* 
eel i bos737 001306 TS bMaCTY SARE ANY DEVICES SELECTED? 
S22 002304 001006 _ BNE 16$ ; 
523 104402 007154 TYPE,  NOACT :NO DEVICES SELECTED. 
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ll I6-MAY-77 09:54 PROGRAM INITIALIZATION AND START UP. 

002312 909009 HALT :STOP THE SHOW 

002314 776 BR - :DISQUALIFY CONTINUE SWITCH 

002316 004737 010512 17$: JSR PC,AUTO.SIZE  ;G0 DO THE AUTO SIZE 

002322 105737 001324 16S: TSTB ~—s INT FLG FIRST TIME? 

002326 001410 BEQ 218 ‘BR IF YES 

002330 105737 001236 TSTB = STRTSW IF USING SAME PARAMETERS DONT TYPE MAP 

002334 100431 BMI 1$ 

002336 032737 OO0006 001236 BIT SBITL!BIT2,STRTSW:-IS TEST NO. OR LOCK SELECTED 

002344 001403 BEQ 4g : fF NO THEN TYPE STATUS 

002346 O00424 BR 1$ : IF YES 00 NOT TYPE STATUS 

002350 005137 001324 21$: COM INIFLG SET FLAG 

002354 104402 24 o4g: ‘TYPE XHEAD TYPE HE 

002360 012704 001500 MOV bOM. MAP, RY :SET POINTER 

002364 010437 O01246 Ss: MOV RY, TEMP! : SET Ss 

370 012437 001250 MOV (R4)+, TEMP2 ‘SET C 

002374 001411 BEQ 1$ ‘ALL DONE IF ZERO 

002376 012437 001252 MOV (RY) +, TEMPS :SET STATI 

002402 012437 001254 MOV (R4)4! TEMPY :SET STAT 

002406 0120437 001256 MOV (R4) +" TEMPS :SET STATS 

002412 104410 CONVRT :TYPE OUT STATUS MAP 

002414 907454 XSTATO : 

002416 7b2 BR 

002420 012700 901500 1S: MOV #0M. MAP, RO ;RO POINTS TO STATUS TABLE 
.: FREAKS KAASSSASSKSSSASSSSLARASSERELASSERARLARRAASLHALHLLSASRLASE FREESE 
::#AUTO SIZE TEST 
:#THIS TEST VERIFYS THAT THE DMC11S AND/OR KMC1IS ARE AT THE CORRECT FLOATING 
: | HADDRESSES FOR YOUR SYSTEM. IF THIS TEST FAILS, IT IS NOT A HARDWARE ERROR. 
!!#CHECK THE ADDRESSES OF ALL FLOATING DEVICES (6J,0H,00,0U,O0UP,LK,OMC,OZ.KMC). 
::#IF THERE ARE NO OTHER FLOATING DEVICES BEFORE THE OMCI1, THE FIRST 
!:#DMNC11 ADORESS IS 760070, KMC11 IS 760110. NO DEVICE EVER BE AT 
SS 760000. THIS TEST MAY REQUIRE 2 OR MORE ATTEMPTS TO GET THE 
:: #RIGHT SSES. AFTER YOU HAVE CHANGED THE ADDRESS TO WHAT IT TOLD 
::#YOU THE FIRST TIME, IT MAY COME BACK AND TELL YOU A DIFFERENT ADORESS 
::#THE NEXT TIME YOU RUN IT. PLEASE HAVE PATIENCE, THE FINAL S 
ss eWILL BE CORRECT (AS LONG AS ALL DEVICES IN FRONT OF THE DMC'S ARE 
: PTTTITiitiiitrititiitiitiittitittittitiitiiiitiitiitietirriericcerces, 

002424 013746 oO0004 MOV ae4,-(SP) ;SAVE LOC 4 

002430 013746 O00006 MOV 386, -(5P) :SAVE LOC 6 

002434 005037 OO000E CLR a86 -CLEAR VEC+2 

002440 005037 001252 CLR TEMP3 CLEAR FLAG 

o02444 CLR RS ?RS=0=DMC, RS=-1=KMC 

002446 011037 O01404 AUSTRT: MOV (RO), DMCSR GET NEXT DMC CSR 

002452 001564 BEQ AUDONE :BR IF DONE 

002454 005705 TST :DMC_OR KMC? 

002456 001005 BNE 1$ :BR IF KMC 

002460 032760 109000 ooD002 BIT #B1T1S,2(RO) :CHECK FOR DMC CSR 

002466 001061 BNE SKIP :SKIP IF NOT DMC 

002470 O00404 BR 2g !ITS A DMC SO CONTINUE 

002472 032760 100000 oocone 18: BIT 881715, 2° RO) “CHECK FOR KMC CSR 

002500 001454 9EQ SKIP :SKIP IF NOT KMC 

002502 012737 o0e674 ofo004 28: MOV BNODEY, 284 :SET UP FOR TIMEOUT 

18 005705 TST RS :DMC OR KMC? 
o02512 001003 BNE 33 :BR IF KMC 


D 
D 


<OMH 


-DMH 
580 
58 


~ 


S82 
583 
S84 
S8s 
S86 
587 
S88 


BB 


5931 
592 
533 
SH 
$95 
5% 


BBs 


583 ul 


BR ORRe GR 


feslealealcalealealealsalealeal 
b= b= b= bb bb be be Be 
WONWU CWO 


RRR PERE 


Coooooms 
RESRY Ht 


Pll 


MACY11 30( 1046) 
16-MAY-7 


002514 


012703 
0004 


ReoRezaR-gece 
Soe tan ages ySe 


001005 


l1-JUL-77 12:32 
09:54 


177777 
001262 


000004 


000002 


000002 


003022 


001276 


001252 


3$: 
4§; 


FLOAT: 


FY: 


NODEV: 


ERR: 


1$: 


MOV 


CO3 


PAGE 13 
PROGRAM INITIALIZATION AND START UP. 


#6,R3 
4§ 


#10'XLOC 
(ROS, OMCSR 
AUDONE 
XLOC, RI 


FY 
(R2)+,-(R3) 
TEMP3 

1$ 


#ERR , SAVPC 


TEMP3 
RI. A aeRI 


3$ 


4$ 


T OF DEVICES BEFORE OMC 


COUN 

S COUNT OF DEVICES BEFORE KMC 
S DE ie TABLE PONTER 
u Re eB 1 


=AMWOW 


er 60010 
NO TIMEOUT, ef NEXT ADDRESS 


Mm MOWDDOD 
2s, 
OQ 


| DEVICES TO CHECK FOR? 


Baz” 


T DMC/KMC ADDRESS 


a 


2 


DMC CSR 
OMC 
CONTINUE 


rinotina® 
ee 


T_NEXT DMC ADDRESS 

‘D0 IT_AGAIN 

i SKIP ae NEXT CSR IN TABLE 
T_NEXT CSR 


T_OMC CSR 
ye DMC/KMC ADDRESS 
T_NEXT DMC/KMC CSR 


Br beieo DMC/KMC ADDRESS 
:0N TIMEOUT, INC R2, DEC R3 
;RETURN 

!CHECK FLAG IF = 0 TYPE HEADER 
SKIP HEADER 


; TYPEQUT T HEADER 


MESSAGE 
ONFIGURATION ERROR!!!! 
i SAVE PC_FOR TYPEOUT 
;TYPE OUT ERROR PC 


TYPE REST OF HEACER 


!SET FLAG SO IT ONLY GETS TYPED ONCE 


;SAVE R1 FOR TYPEOUT 
; TYPE 7 a 
DMC OR 

:BR IF Knee” 


; CONTINUE 


PAGE: 


5 
DMC’S ARE LEFT, SET UP FOR TIMEOUT 


o0ee 


DOS 


OZOMH = -MACY11 30(104G) 11-JUL-77 12:32 PAGE 14 PAGE: 0029 
DZDMH.P11 16-MAY-77 09:54 PROGRAM INITIALIZATION AND START UP. 
S Biers 07390 3S: Heh 
4S: CMP (SP)+, (SP)+ ;ADJUST STACK 
Soe BR OK ;BR TO GET OUT 
1 ERRPC: 1 
641 77e 002 .BYTE 6,2 
642 002774 001276 SAVPC 
643 002776 00002 CONTAB: 2 
644 003000 004 -BYTE 6,4 
4S 003002 003022 XLOC 
003004 002 .BYTE 6,2 
647 003006 001404 DMCSR 
648 903010 007 DEVTAB: .BYTE 7 :DJ 
649 003011 017 -BYTE 17 30H 
003012 9o07 BYTE 7 ;00 
651 003013 007 BYTE 7 ;0U 
003014 007 BYTE 7 ; OUP 
653 003015 007 BYTE 7 :LK 
654 003016 007 BYTE 7 ;OMC 
6S5 003017 007 BYTE ? ;02 
656 003020 007 BYTE 7 ;KMC 
657 003022 EVEN 
658 003022 000000 LOC: 0 
659 003024 005705 AUDONE: TST RS ;DMC? 
660 003026 001005 BNE 1§ ;BR_IF_KMC AND ALL DONE 
661 003030 012705 177777 MOV 8-1,R5 ;SET RS 76. =1 (KH) 
662 003034 012700 001500 MOV #0M. MAP, RO {RESET ROTO START OF TABLE 
663 003040 000602 gk AUSTRT ;G0_ 00 KMC’S 
664 003042 012637 000006 18: MOV (SP)+, a6 ; RESTORE LOC & 
665 003046 012637 900004 MOV (SP) +, a4 RESTORE LOC 4 
666 O0030S2 032737 O00010 001236 BIT wSWO3,STRTSW SELECT SPECIFIC DEVICES?” 
667 003060 O0i4ee BEQ. 38 ;BR_IF NO. 
668 003062 104402 006144 TYPE =, MNEbi ;TYPE THE MESSAGE. 
669 003066 CLR RO ;ZERO DATA LIGHTS mores 
670 003070 000000 HALT AIT FOR USER TO TELL WHAT DEVICES To RUN 
671 003072 027737 176104 001212 CMP =o @SWR, SAVACT STS THE NUMBER VALID? 
672 003100 101404 BLOS oS :BR IF NUMBER IS OK. 
673 003102 104402 906005 TYPE — , MERR3 ;TELL USER OF INVALID NUMBER. 
674 003106 000000 HALT STOP EVERY THING. 
675 003110 000776 ae .-2 RESTART THE PROGRAM AGAIN. 
676 003112 017737 176064 001306 2s: MOV = @SWR, DMAC TY GET NEW DEVICE PATTERN 
677 003120 013700 001306 MOV. OMACTV, RO ;SHOW THE USER WHAT HE SELECTED. 
678 003124 HALT CONTINUE DYNAMIC SWITCHES. 
679 003126 012700 000309 38: MOV #300, RO PREPARE TO CLEAR THE FLOATING 
680 003132 012701 000302 MOV 8302 ,R1 'VECTOR AREA. 300-776 
681 002136 010120 48: MOV =—s R21, CRO) + ;START PUTTING "PC+2 - HALT" 
682 003140 00502! CLR (RL) + IN VECTOR AR 
683 O0314e 022021 CMP (RO)+, (R1)+ :POP POINTERS 
684 003144 022700 001000 CMP #1000, RO ALL DONE ?? 
B85 003150 901372 BNE 48 :BR IF NO. 
£87 TEST START AND RESTART 
68g J ooneenenene anne a aaeee- 
a 
690 003152 012706 001200 BEGIN: MOV BSTACK, SP :SET_UP STACK 
691 OO31S— O:374 OCO00e MOY = Jeb, - (SP SAVE LOC & 


E03 


MACYL1 30(1046) 1J-JUL-77 12:3 PAGE: 6 
RSE ee tate 88 og tds Brocka fRITIALIZATION AND START UP. GE: 003 

692 003162 013746 O00CD4 MOV ae4, -(SP) :SAVE LOC 4 

$93 003766 005009 CLR R :START AT O 

694 i70 Ole737 003234 o00004 MOV 82S, 084 :SET UP FOR TIME OUT 

695 003176 005037 000006 CLR dab :TO AUTOSIZE MEMORY 

6% 003202 005720 6$: TST (RO)+ ‘CHECK ADDRESS IN RO 

697 003204 022700 157776 CMP #157776,RO :1S IT AT LEAST 28K 

$98 003210 001374 BNE 6$ ‘BR IF NO 

699 003212 162700 007776 SUB 87776, RO :SAVE 2K FOR MONITORS 

700 003216 010037 001304 7$: MOV RO, MEMLIM ‘STORE MEMORY gbintt 

701 O03222 012637 O00004 MOV (SP)+, aa4 !RESTORE LOC 4 

003226 012637 O00006 MOV (SP) +; da : LOC 6 

703 003232 000413 BR l : CONTINUE 

704 003234 022626 2$: CMP (SP)+, (SP)+ !ADJUST STACK 

705 003236 162700 oo0004 SUB RO’ GET LAST GOOD ADDRESS 

706 003242 162700 007776 SuB s7aob RO :SAVE 2K FOR MONITORS 

707 003e%% 022700 030000 CMP #300 0000, RO IS IT 8k? 

708 003252 001361 BNE :BR IF NO 

703 003254 012700 037400 MOV 437400, RO : IF 8K DON’T SAVE 2k 

710 003260 000756 BR 7§ 

711 003262 012737 000340 177776 10$: MOV #340, PS LOCK OUT INTERRUPTS 

712 003270 032737 O00004 001236 BIT #B1T2,STRTSW  :CHECK FOR LOCK ON TEST 

713 003276 001411 3EQ $ !BR IF NO LOCK DESIRED 

714 003300 104402 006947) TYPE MLOCK ‘TYPE LOCK SELECTED 

715 003304 012737 00024) 003612 MOV NOP, TTST ‘ADJUST SCOPE ROUTINE 

716 003312 012737 OO00240 003614 MOV #NOP! TTST+e2 :SET UP TO LOCK 

717 003320 000406 BR CONTINUE ALONG. 

718 003322 013737 003730 003612 iS: MOV BRW, TTST :PREPARE NORMAL SCOPE ROUTINE = 

719 003330 013737 003732 0036!4 MOV BRX’ TTST+2 "LOCK NOT SELECTED, SET we FOR NORMAL SCOPE LOOF 

720 003336 012737 010060 odi214 3S: MOV acYCLE. RETURN START AT CYCLE Rai ICH DEVICE TC TEST 

721 003344 030737 900002 001236 ug: IT #SWOl,STRTSW 31S TEST NO. SELE 

7ee 003352 001002 SNE 5$. :BR IF 

723 093354 104402 905755 TYPE : TYP 


R 
724 003360 O00177 175630 S$: JMP SRETURN :START TESTING 


FOS 


DZDMH = MACYLI 3011046) Ll-JUL-77 12:32 PAGE 16 PAGE: 
DZDMH.PLL 16-MAY-77 09:54 END OF PASS ROUTINE 
v4 ENR, OF PSR. re 
727 : UPDATE bass COUNT ee 
é 
58 SHE GI FOR EX 
731 003364 900005 .EOP: RESET AKE THE WORLD CLEAN AGAIN. 
732 003366 005037 001234 CLR LSTERR ‘CLEAR LAST ERROR PC 
733 105037 001325 CLRB ERRFLG CLEAR E RROR FLAG 
734 003376 005237 001230 INC ASCNT ATE PASS COUNT 
73S 003402 013777 001230 i75570 MOV PASCNT, JDISPLAY : DISPLAY PASS COUNT 
736 003410 104402 905733 TYPE .MEPASS : TYPE END PASS 
737 OO3414 104402 006072 TYP *MCSRX : TYPE CSR 
738 003420 104411 003546 CNVRT  ;XCSR -SHOW IT 
7393 24 104402 006109 TYPE , MVECX ; TYPE VECTOR 
740 003430 104411 9003554 CNVRT  )XVEC 
741 003434 104402 006106 TYPE ‘ MPASSX : TYPE BASSES 
742 003440 104411 003562 CNVRT  ; xPASS :SHOW IT 
743 00 104402 006117 TYP * MERRX ; TYPE ERRORS 
00. 1044i1 003570 CNVRT XERR IT 
745 003454 013700 001322 MOV AIL eT POINTER TO PASS COUNT 
746 013720 001230 MOV PASCHTS (RO)+ ; STORE PASS COUNT FOR THIS DMC11 
747 003464 013720 001232 MOV ERRCNT, (RO)+ :STORE ERROR COUNT FOR THIS DMC]! 
748 003470 37 001314 DEC SAVNUM’ ; ARE ALL DEVICES TESTED? 
749 003474 001017 BNE RESTRT F 
003478 112737 000377 901327 MOVB 8377,QV.FLG SET THE QUICK VERIFY FLAG. 
751 013737 901310 001314 MOV DrNu SAVNUM RESTORE THE COUNT 
752 003Si2 013701 900042 MOV 2, Ri :CHECK FOR ACT-11 OR DOP 
753 003516 001406 BEQ secret !IF NOT, CONTINUE TESTING _ 
754 003520 o00005 RESET :STOP THE SHOW--CLEAR THE WORLD 
755 003522 $ENDAD: 
756 003522 004711 JSR Pc, (RL?) 
7 003524 900240 NOP 
758 003526 o00240 NOP 
753 000240 NOP 
7 003532 NOP 
761 003534 012737 O10060 901214 RESTRT: MOV BCYCLE, RETURN 
762 9032542 000137 910060 IMP CYCLE 
763 003546 000001 veSR: 1 
764 003550 006 002 .BYTE 6,2 
765 003552 001404 DMCSR 
766 0903554 000001 XVEC: 1 
767 003556 004 oo2 -BYTE 4,2 
768 002560 001374 OMRVEC 
769 003562 000001 ypass: 1 
770 003564 006 o02 .BYTE 6,2 
771 003566 001230 PASCNT 
772 003570 000001 XERR: 1 
773 90357 906 o92 -BYTE 6,2 
ra 003574 001232 ERRCNT 
aa | ;SCOPE LOOP AND INTERATION HANDLER 
DO ROSS SSS SSS 92S SS9S SSS 99SS9S8S2 
776 F 
779 003576 004737 O0760E SCOPE: JSR PC, CKSWR :CKECK FOR SOFT Suk 
"s> 903602 O1OOle MOV RO, (SP) “SAVE RO ON THE STaCk 


GO3 


DZDMH = MACYL1 30(1046) L1-JUL-77 12:32 PAGE 17 PAGE: 0032 
DZDMH. P11 16-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
781 003604 032777 O40000 175370 BIT #BIT14, ISWR :"LOOP ON THIS TEST”? 
782 003612 001407 TTST: BEQ 1$ :BR IF NO. iF LOCK SHOL=1; T 1s LOC 842) 
783 003614 000437 BR 3$ :GOTO 3$ (IF LOCK l=1; THIS COC 2242) 
784 003616 005737 003734 TST DONE ;WAS TKCSR DONE SET? 
785 003622 001434 omens BEG ie 36 IF NO af LOCKED ON TEST) 
ra ¢ ; 
“3 BO sesc 15 BR BS :60 fo tee TES 
788 003632 032777 O0O4000 175342 1$: BIT #SW11,aSWR !DELETE ITERATION? (QUICK PASS) 
789 003640 00101 BNE :BR IF YES 
790 003642 105737 001327 TSTB  =—s_« QV. FLG ‘HAVE PASSES BEECOMPLETED” 
791 003646 001406 BEQ 2$ :BR IF QUICK PASS. 
792 003650 005237 001224 INC LPCNT ‘UPDATE ITERATION COUNTER 
; 003654 023737 O0l2ee4 001222 CMP LPCNT, ICOUNT “ARE ALL ITERATIONS DONE?? 
794 003662 101414 BLOS = s(-3$ :BR if NOT YET 
795 003664 105037 001325 2s: CLRB = ERRFLG ‘PREPARE FOR NEW TEST 
79% 003670 005037 001204 CLR LPCNT ‘START ICOUNTER AT O 
7397 003674 005037 001220 CLR LOCK 
798 003700 012737 000020 001222 MOV 820 ICOUNT :RESET ITERATIONS 
798 003706 013737 OOl2e16 001214 MOV NEXT, RETURN ;GET NEXT 
g00 003714 9011600 38: MOV (SP) ‘RO : POP RQ OFF OF THE STACK 
801 003716 O22626 POP2SP : FAK RTI" 
802 903720 013701 001404 MOV DMCSR,R1 RI EonTAING BASE DMC ADDRESS 
803 003724 000177 175264 IMP JRETURN :GO DO THE TEST 
804 903730 001407 SRW 1407 
80S 903732 000437 BRX 437 
96 003734 900000 DONE: 
Boe sCHECK FOR FREEZE ON CURRENT DATA 
g10 : 
811 003736 004737 007606 .SCOP1: JSR PC, CKSWR :CHECK FOR SOFT SWR 
812 003742 032777 901000 175232 BIT #SW09, ISWR -IS SWO9=! (SET) 
813 903750 901405 BEG 1$ :BR IF NOT SET. 
814 003752 005737 901220 TST LOCK 
815 003756 O014 BEG 1$ 
816 003760 013716 001220 MOV LOCK, (SP) :GOTO THE ADDRESS IN LOCK. 
17 003764 900002 1$: RTI :GO BACK. 
£19 : TELETYPE OUTPUT ROUTINE 
gst joer ore seer oneosooecnn- 
B55 DOITe StTEOS ibe ~~ aetspsi Rs rae abgRESS OF REeSAce. 
00 as ! ) ie 
ak Be 5805 BpoR RS ooo0de abe Bish) Boe b UPR BB RESS. 
825 004002 005737 O1O0016 4$: TST carte T SWR NEScnGE? a 
826 O04006 001004 BNE 1$ He YES TYPE IT OUT REGARDLESS OF SWi2 
827 004010 032777 O1D000 175164 BIT $aWl2, SUR : INH 1817 ALL PRINT OUT?? 
828 OO401E O01012 SNE 3$ :BR IF NO PRINT OUT WANTED (Swi2=1 
829 o904020 105715 i$: TSTB (RS) -TS NUMBER MINUS? (MSB=1 (BIT?) 
830 o004022 100002 BPL 23 :BR IF NUMBER IS PLUS 
821 004024 104402 o0St72 TYPE MCRLF : TYPE A CR/LF! 
832 004030 105777 175154 23: TSTB aTPCSR : TTY READY? 
633 004024 100375 SPL 2s :BR IF NO. 
£34 004036 112577 175150 MOVB (RS)+, JTPOSR :PRINT CURRENT CHAR. 


S O0404e 001357 BNE 4$ :IF NOT ZERO KEEP PRINTING! 
& OO4O44 012605 38: MOV (SP)+,R5 SEND OF OUTPUT. RESTORE &5 


CLDMH  MACYL1 30‘ 1046) 


OZOMH. PLL 16-MAY-77 09:S4 


004046 


004130 


peseeteesaeee 
NSPERS OSA ERE 


004276 


oos002 


010346 
O10446 


a latetetatatatatat 
onhnnnros 
Ww 
a ] 


05140 


L1-JUL-77 


000004 9d04072 
000092 900004 


000015 
175054 
175044 


OOSSEE 


900004 
64 


000667 
OCO0ED 
o0ccis 


175046 


le:32 PAGE 


HO3 


PAGE: 0032 
;GO HOME 


;SAVE R3 ON STACK 
SAVE R4 ON STACK 


;RESTORE RY 
;RESTORE R3 


18 
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
RTI 
J INSTR: MOV R3,-(SP) 
MOV 4’-(5P) 
MOV ahd MSG 
ADD (SP) 
.INST1: TYPE 
.MSG: 0 
MOV #INBUF , RY 
MOV #7,R3 
1S: TSTB = ATKCSR 
BPL 
MOVB = ATKDBR, (R4) 
BICB #200, (RY) 
MPB (R4)+. a15 
BEQ INSTR2 
2¢: TSTB = ATPCSR 
BPL 23 
MOV JTKDBR, aJTPDBR 
DEC R3 
BNE 1$ 
MOV (SP)+,R4 
MOV ahs R3 
.INSTE: TYPE 
MOV A}. -(SP) 
MOV RY = (SP) 
BR INSTI 
INSTR2: MOV (SP)+,R4 
MOV (SP)+,R3 
RTI 
: CONVERT ASCII STRING 
.PARAM: MOV RS, -(SP) 
MOV Z -(SP) 
MOV 1,RS 
MOV (pepe LOLIM 
MOV (RS)+,HILIM 
MOV (R5i+, DEVADR 
MOVB (RS)+,LOBITS 
MOVB (RS)+, ADRCNT 
MOV 5. 4(SP) 
PARAML: CLR 
MOV #INBUF ,R4 
CMPB saw 1S. (RY) 
BEG PARERR 
1g: CMPB (R4), #60 
BLT PARERR 
CMPB (R4). e67 
BGT PARERR 
8ICB  =—s-_- BD. (RY) 
BI1SB (R454. RS 
CMPB #15, (RY) 
BEG LImits 


;TEST TO SEE IF NUMBER IS WITHIN LIMITS 


;STORE NUMBER AT SPECIFIED ADDRESS 


;SAVE PC OF TEST THAT FAILED AND RO-FS 


7 SRV 
;LEAVE. 


;RESTORE 
:RESTORE 


DZDMH MACYLI 30(104%6) 1L1-JUL-77 12:32 PAGE 19 
DZDMH.P11 16-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOFE, ETC) 

893 004300 006305 ASL RS 

894 004302 006305 ASL RS 

Sime we i 

B38 104404 PARERR: INSTER 

898 904312 600750 BR PARAM! 

9993 

goo 

a3 ; 

893 004314 020537 004366 LIMITS: CMP RS HILIM 

304 004320 101373 BHI PARERR 
004322 004364 CMP RS. LOLIM 
004326 103770 BLO PARERR 

907 004330 133705 004372 BITS LOBITS,RS 

308 004334 001365 BNE PARERR 

a 

91 13704 004370 MOV VADR, RY 

31 Boyaee 8 1$: MOV pees 

914 004344 062705 oDD00e ADD #2'RS 

915 0043S0 ? 004373 DECB  ADRCNT 

916 004354 001372 BNE 1$ 

917 004356 012604 MOV (SP)+,R4 

318 004360 Ol26 MOV (SP) + RS 

919 362 RTI 

920 004364 o00009 LOLIM: 0 

S21 004366 o00000 HILIM: OQ 

922 004370 oO00000 DEVADR: 

323 004372 o00000 LOBITS: O 

924 004373 ADRCNT=LOBITS+1 

Ses 

926 

353 ; 

323 004374 016637 OO00004 001276 .SAVOS: MOV 4(SP), SAVPC 

331 :SAVE RO-RS 

933 o04402 010537 951 ? SvOS: MOV RS, SAVRS 

924 004 910437 00127 MOV RY’ SAVRY 

935 O0441l2 010337 001 MOV R32; SAVR3 

$36 OO441E 910237 1264 MOV Re. SAVRe 

937 004422 010137 OOlebe MOV RI’ SAVRI 

$38 004426 010037 001260 MOV RO; SAVRO 

333 004432 900002 RTI 

Fal :RESTORE RO-RS 

943 004434 013700 o01260 -RESOS: MOV SAVRO, RC 

944 004440 013701 O012b2 MOV SAVRI'RI 

re Bese Gs else my vee 

tg . 
a5 4484 Bt 704 webu MOV AYRY | RY 
S42 OO44E0 012705 O01e7¢2 MOY SAVRS. 8S 


;RESTORE 


PRGE: 


JQ3 


DZDMH = MACYL1 30:1046) 1l-JUL-77 12:32 PAGE 20 PAGE: 
ZOMH. PLL l6-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
949 904464 j0000e2 RTI : LEAVE 
ey :CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 
ae oo4466 104402 005672 .CONVR: TYPE MCRLF 
965 004472 OLOO4E “CNVRT: MOV RO, -(SP) 
956 004474 O10l4E MOV R1.-(SP) 
? 4 1034 MOV R3,-(5P) 
MOV RY’ =( 
10S46 MOV -(5P) 
960 OO4SO4 017601 000012 MOV a12(SP),R1 
961 004510 062766 O00002 000012 ADD #2, 12(SP) 
36 § 012137 p04719 MOV (R1)+,WROCNT 
4 112137 00471 1$: MOVE —(R1) +, CHRCNT 
S2 mee due ies my sieuginno 
+ 
966 Bovese 122739 Boo003 oo47le CMPB a5 CHRCNT 
967 004544 001003 BNE 
968 O04S46 042737 177400 004714 BIC #177400, BINWRO 
969 O045S4H 013704 004714 2$: MOV BINWRD, RY 
970 bo¥s60 113705 O0471e MOVE § CHRCNT_RS 
971 4564 012700 O01416 MOV STEMP.R 
972 004570 010403 38: MOV R 
973 004572 042702 177770 BIC #1?7770,R3 
974 004576 03 oo0060 ADD #060,R3 
975 110320 MOVE  R3,(RO)+ 
976 004604 CLC 
377 ROR RY 
978 004610 o00241 CLC 
979 le ROR RY 
980 14 4) CLC 
98i O04616 ROR RY 
9g2 20 005305 DEC RS 
983 O04%622 001362 3$ 
984 O046e4 012703 007544 MOV #MDATA,R3 
98S 004630 114023 4$: MOVB -(RO}, R32) 
986 O04632 105337 904712 DECB CHRCNT 
987 004636 001374 BNE 4§ 
004640 105737 004713 TSTB  —- SPACNT 
644 0014 , 
990 4 112723 000040 cs: MOY #040, (R3)+ 
991 004652 105337 004713 DECB = SPACAT 
aa5 aoeeb tos013 6s: RB 
$ 3 
994 104402 007544 TYPE MDATA 
995 004666 005337 004710 DEC WROCNT 
396 O0v672 001313 BNE Re 
) - 
76 ea MOV (SP)+,R 
999 004700 012603 MOV (SP)+'R2 
1000 004702 012601 MOV (SP)+.R1 
; i os2 MOV (SP i+. RO 
19 47] WROCNT: 0 
1004 04712 0090900 PuBANT: O 
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} 4? PACNT=CHRCNT+1 

126 004714 iat BINED HR 

{RRR ; TRAP DISPATCH H SERVICE aaa 

1010 y S EX D 

iB iene USED Bs greet 1 § Meats POINTER 

ible 5 SELECTED SUBROUTINE 

1014 OO4716 011646 .TRPSR: MOV (sP) -(SP) ;GET PC oF RETURN 

} 47 7 S (SP) '=PC OF TRAP 

ite Badsso Abst BBRRRE aye ais, (SP) SEY Tre 

1917 004730 006316 TRPOK: ASL “MULTIPLY TRAP ARG BY 2 
1018 004732 042716 177001 BIC 4177001 (SP)  :CLEAR UNWANTED BIT 
1919 004736 960716 001330 ADD #.TRPTAB, (SP) POINTER TO SUBROUTINE ADDRESS 
1920 OO04742 017616 9000000 MOV SSP) (SP) SUBROUTINE ADDRESS 

102i 004746 900136 IMP a(SP)+ :GO TO SUBROUTINE 

1023 :ERROR HANDLER 

ioee ER es 

ie GRO RUT BES arco BR ROE EBEMGRME ART 

1352 Bouses barane : fo  xBx Be Teh NOBEL 

1029 004764 105777 174220 TSTB  aTPCSR Y READY. 

1030 004770 100003 BPL XBX ‘DON’ T WAIT i TTY NOT READY. 
1031 004772 112777 000207 174212 MOVB #207, aTPDBR :PUSH A BELL AT THE T 

1032 OO0SO000 032777 O20000 174174 XBX: BIT 8SW13, ISWR : DELETE ERROR APRINT our? 
1033 005006 001105 BNE HAL :BR IF NO PRINT OUT WANTED. 
1034 OO0SO10 021637 001234 CMP (SP), LSTERR WAS THIS ERROR FOUND LAST TIME? 
10a SOsOLe Ores 901234 ay (SP) ,LSTERR rR RO. ‘ee IN HERE 

1037 o05022 ask 001325 CLRB cBpeck ‘BRE Ae BeR 

1038 005026 104406 18: SAVOS ; SAVE ALL PROC REGISTERS 
1039 005030 011605 MOV (SP). RS :GET THE PC _OF ERROR 

1040 005032 162705 oo000e2 SUB #2,R5 :GET ADDRESS OF TRAP CALL 
1041 005036 011504 MOV (RS), RY :GET HLT INSTRUCTION 

1042 O0S040 006304 ASL RY :MULT BY TWO 

1043 005042 061504 R00 (RS) RY DOUBLE IT 

SpebdE ie 177001 BIC #177001 ,R4 RY : CLEAR JUNK 

tous ope Eber oF A mater MOV (R4)+,E Anes GET ERROR MESSAGE 

1048 012437 0052 MOV (Rae DATAHD § :GET DATA HEADRER 

1049 005066 011437 O0Se16 MOV (R4) , DATABP !GET DATA TABLE 

10S0 005072 105737 001325 TSTB —s ERRFLG : TYPE HEADREER 

1051 005076 001403 BEQ TYPMSG :B YES 

1052 005100 005737 o0S216 TST DATABP :DOES DATA TABLE EXIST? 
1053 0051 091049 BNE TYPOAT -BR IF YES. 

1054 0051 104402 905672 TYPMSG: TYPE ,MCRLF 

1055 lle 104402 005672 TYPE  'MCRLF 

1056 005116 005737 O01220 TST Lock 

107 005122 001402 BEQ 1$ 

1058 005124 104402 oob14e TYPE | MASTEK 

1059 005130 104402 006130 1$: TYPE [MTSTN 

1960 005134 10441] 905330 CNVRT = > XTSTN -SHOW IT 
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4 TYP :TYPE PC. 
Bed 3 a ie Mei BBeSee cht VERT ABO iat ou Acar 
150 1044 
10e3 Bis lle 3398 ose es 001325 MOV ini TERRFLG ‘AD Fo e HEADER UNLESS NO DATA TABLE. 
1065 005162 005737 AREAS TST IS TOERE AN ERROR MESSAGE? 
is Geeiee fous an ae 
1068 pe 58 ha0005 ERRMSG: 0 ; ERROR MESSAGE 
1069 005174 WRKO.FM: 
1070 005174 005737 o0S204 TST DATAHD ‘DATA HEADER? 
1071 oo0S200 001402 BEQ TYPDAT -BR IF 
1072 o0Se02 104402 TYPE :TY 
1073 005204 DATAHD: 0 : DATA HEADER 
1074 005206 005737 o0Se2l6 TYPDAT: TST DATABP ‘DATA TABLE? 
1075 OO0S2i2 001402 Q RESREG :BR IF NO 
1076 005214 104410 CONVRT ; 
1077 00521 DATABP: 0 DATA TABLE 
1078 005220 104407 RESREG: RESOS 'RESTORE PROC REGISTERS 
1079 O0S222 022737 cO3S22e o00042 HALTS: CMP #SENDAD,a842 ;IF ACT-11 AUTOMATIC MODE, HALT!! 
1080 005230 001403 BEQ 1$ 
1081 005232 005777 173744 TST aSWR ;HALT ON ERROR? 
1082 005236 100005 BPL EXITER BR IF NO HALT ON ERROR 
1083 O0S240 O10046 1$: PUSHRO :SAVE RO 
1084 O0S242 016600 oD0002 MOV 2(SP),RO :SHOW ERROR PC IN DATA LIGHTS 
1098S 005246 000900 LT : 
tig 0 37 oole EXITER te ERRCNT BDATE ERROR COUNT 
1088 ppeser 33935 Bpag30 173716 BIT #SWO8 , ISWR :GOTO TOP OF TEST? 
1089 00S264 001007 BNE 1$ iB IF YES 
1090 005266 777 002000 173706 BIT #SW10, JSWR GOTO NEXT TEST? 
1091 005274 001411 BEQ NO 
1092 005276 013737 001216 001214 MOV NEXT, RETURN ISET FOR NEXT TEST 
1093 005304 012706 9001200 1$: MOV aSTACK. SP RESET - 
1094 005310 013701 901404 MOV OMCSR, R1 :SET UP R 
1095 095314 177 173674 JMP JRE TURN : GOTO SPECIFIED TEST 
1096 2$: RTI : RETURN 
ine 005322 oe et ERTABO: 1 vr ae 
10 Wee 6 SAVP ’ 
1100 ppe3se Ol XTSTN: 1 
1101 332 003 002 -BYTE 3,2 
1102 005334 001226 TSTNO 
1193 zENTER HERE ON POWER FAILURE 
1105 
1106 
tbe Spee 012737 905350 ojp0024 tte MOV RESTART, 24 :SET UP FOR POWER UP TRAP 
/ 8 P OW 
1109 0060 HALT ‘HALT ON POWER DOWN NORMAL 
1110 005346 000777 
111e ;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 
1114 RESTAR: 
1115 005350 012737 005336 900024 MOV #.PFAIL, 24 :SET UP FOR POWER FAILURE 
illé 356 Ole706 001200 MOY aSTACK, SP :RESET THE STACK POINTER 


LOS 


-< ee ee ee 


0037 


MO3 
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HG BRESEE GHSER) SBN tk TORR! ERO 

001416 INC TEMP ;PLUS, ONE TO THE TIMER! 

iis? mean riba 005675 Yee HPrAIL A ae an 

1122 404 1 430 NVRT  _PFT Df Me WHAT ayes TO RETURN TO. 
1123 410 1psas? 1326 LRB = ERRFL 

11 414 7 O01 CLR LSTE : winaasheen 

tise reuse Baa] MSTCLR sient LER OCEAN BB DEVICE 

1158 aah ho01 173564 IMP JRETURN START DOING THAT TEST AGAIN 
1128 005430 000001 PFTAB: 1 

1129 005432 003 002 .BYTE 3,2 

1130 005434 001226 TSTNO 

1132 005436 DELAY: 

1133 005436 012777 000020 173746 MOV #20, JDMPO4 

1134 oOOS444 104414 ROMCLK :NEXT WORD I INSTRUCTION, ROMCLK PC=S304 
1136 bo 121111 . lelill *POKE CLOCK DELAY BIT 

1137 O0S450 104414 ; ROMCL rot wee 1S, INSTRUCTION, ROMCLK PC=5304 
1138 nati Asisss 000020 173730 bgt #B1T4, JDMPOY Tete otk Bit cere 

11490 OOS462 001772 BEQ 1$ 

114d 005464 o00002 RTI 

1143 OOS465 -MSTCLR: 

1144 OOS466 152777 000100 173712 BISB  #BIT6,aDMCSRH  ;SET MASTER CLEAR 

1145 005474 142777 000300 173704 BICB s#BIT6!BIT7, aoncshi ;CLEAR MASTER CLEAR AND RUN 
1146 Oossd2 do000e RTI ETURN 

1148 O0SSO4 -ROMCLK: 

1149 005504 152777 o00002 173674 BISB sBIT1,aDMCSRH ;SET ROMI 

1150 005512 013677 173676 HOV a SP) ¢ ,@OMPO6 ;L08D INSTRUCTION IN SEL 

ae -_ . 

i123 885538 ate 1734S2 ag $06 SUR ‘HALT IF SHOb =] 

i123 Goees>  ponoOR a iF Be CLOCKING INSTRUCTION 
12d ead 000003 173644 1$: ATSB #8171!B1T0, ONCSAH HALT BK ORE G06 t{hS 

1156 O0SS42 142777 000007 173636 BICB  =-_- #B 1 T2'B1T1! BIT, a0NeSRH ; CLEAR ROMO. ROMI, STEP 
1157 005550 o00002 RTI 

1159 oossse .DATACLK: 

1160 O0S5S2 013637 O01416 MOV a(SP)+. TEMP ;PUT TICK COUNT IN TEMP 

ties Opsses 165779 goone0 173616 ~ . eT eter to 

1163 Bpees 136555 173610 173606 ‘ CMP JOMCSR, JOMCSR WASTE TIME 

1164 005576 142777 g000¢0 173602 BIce #BIT4, spac She Bee nce co 

(lee BOSeIO oor ae4 Be SCS BE 1p NOT DONE 

1167 005612 o00002 RTI : N 

1168 005614 000001 2S: -BLKW 1 

1170 1b TIMER: 

1171 16 013637 O01416 MOV a(SP)+, TEMP ;MOVE COUNT TO TEMP 

1172 O0S622 O6274%6 oO0000e ADD #2,-(SP) !ADJUST STACK 
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tt5d BREBSE ro4yiy i ROMCLK sNEXT WORD Is INSTRUCTION, ROMCLK PC=5304 
005630 4 364 : PORT4+ IBUS# 
1125 Bob 3s Gse277 oo0002 173552 Bit #2 , JOMPOM ; ay et Bek Bit CLEAR? 
178 O0S642 . 2g : ' wis ves 
4 $ 
1173 42 104414 ROMCLK IS INSTRUCTION, ROMCLK PC=5204 
1180 nate 1364 021364 te BUS* REG11 
1181 OOSE46 032777 o00002 173536 SIT #2, JDMPO4 i PGM CLOCK BIT SET? 
1185 Operee pp2375 001416 Bre FEnp BR Fount 
1184 005662 001361 BNE 1§ BR IF NOT DONE 
1185 005664 o00002 RTI : RETURN 
118 Beeps boo MORCF: “REEES cas) «la» 
(2) 005675 020122 MPFAIL cig (377>/PWR FAILED. RESTART AT TEST / 
(2) 005733 047105 104 MEP ASC (372) /END PASS DZDMH 
oe 
‘§} oeR 047377 ues 042504 MERR2 3 (399) NO DEVICES PRESENT. / 
(2) 377 047111 052523 MERA: ASCIZ (377) / INGUFPICIENT DATA! / 
(S} Boebas Bisery basebs KS? Reet SPB 60K OF ON SELECTED TEST” 
(2) 006072 051503 035122 900040 NCSRX: -ASCIZ ; 
(5} Bee} Be nate MPASSXK Pacts Hs 4 
(2) 006117 105 OSlle2 051117 RRX: :ASCIZ 
(@) 006130 042524 052123 047040 NTSTN: ASCIZ / TEST N NO: ? 
(2) 006144 081777 952108 sig MINE: -ASCIZ (377) /SET SWITCH REG TO DMC11'S DESIRED ACTIVE. / 
(2) ree = o202 12 O20040 XHEAD ASCII cele>/ MAP OF DMC11 STATUS’ 
2) Bibsee eiels EEE Bugs fell Wi)” ec cGk stati State ster, 
(2) O064S0 053517 O46440 NUM:  .ASCIZ <377>/HOW MANY Qc’ S TO BE TESTED?/ 
2) Bee Blirr idee Bee Seti CAELE rn eCiatneoe 
(2) 54 377 051102 OSO040 PRIO: Beets (355) AB pet PRIORI Y LEVEL? (4 S,6,7)? 
(2) 044777 020106 O46S04 CRAM: :ASCIZ <377>/IF DMC HAS CRAM (M8204) Tepe IF CROM (M8200) =TYPE, “N” 
(2) 006704 05.3777 044510 ov 103 HODU: -ASCIZ (37?) /MHICH LINE | UNIT? IF NONE TYPE E “Nt, IF MB2Ol TYPE “1", IF M 
(2) 07 051777 ates 041524 "aSCI2Z 377) /SUITCH PAC #2 (BAG?3 BOOT AL ADD) ?/ 
(2) 007114 044777 O20l2e3 O44124 C "@SCIZ <377>/1S THE LOOP BACK CONNECTOR ON?/ 
(2) 007154 047377 O20117 O4eS04 NOACT: :ASCIZ <377>/NO DEVICES. ARE. SELECTED 
(2) 007205 77 51412 Os1ie7 SuNES ASCIZ 377 (377) (12>/SWR= 7 
(2) 0072 377 042377 O41S15 PONERR ASCI «3 11 FOUND AT NON-STANDARD ADDRESS PC: / 
(3) 377 Beg a6 pypes8 CNERR Pacts | (372) 78 xPEC ED FOUND/ 
(5) 007330 QeveND PEELS GSueDS PMcM; § TASCIZ. 7 (RNG) 
(@) 007340 Ba2a77 041515 O3c46l SPEED: _ASCIZ (379) /DMC1L1-AR( REMOTE, LOW SPEED) OR DMCLI-AL‘LOCAL,HIGH SPEED) T 
(2) 007454 po000S XSTATQ: S 
1188 007456 O06 003 b, 
1189 OO7460 o01246 TEMP! 
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7462 006 
4 001250 


DZOMH.P11 


~~ 
_ 
28 


SSSR SRR FOES 
8 
2 
a 


Bare 


ror 
FA 


007502 
007544 


4 7756 
i245 007760 


003 
003 
003 
ode 


000176 
171362 
177777 
000007 
000207 
177777 
177777 
007205 
007215 
610020 
000015 
000012 


oo00es 
000007 


177770 


001202 


003734 
171346 


171336 


010016 


L1-JUL-77 12:32 _ PAGE 2s 
S4 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 


CKSWR: 


2s: 


1$: 


CKSWR1: 


CKSWRe: 


CKSWR3: 
CKSWRY: 


BOY 


6,3 
6,3 
6,3 
6,2 


PAGE: 


;BUFFERS FOR INPUT-OUTPUT 


0 
0 


;ROUTINE USED TO CHANGE SOFTWARE SWITCH 
;REGISTER USING THE CONSOLE TERMINAL 


#-1, DONE 
87, aTKDBR 


;IS THE SOFT SWR BEING USED” 
:BR IF NO 

-1S DONE SET? 

:GO ON IF NOT SET 

‘IF DONE SET, SET FLAG 

-WAS CTRL G tyPED? re BIT ASCII) 
‘BR IF YES 

:WAS CTRL G TYPED? (8 BIT ASCIT) 
:BR IF NO 

‘STORE Re 

: STORE RS 


;STORE R 

:SET CORT TYPE OUT FLAG 
LEAR NEW SWR CONTENTS 

SET "st QO ALL ONES 


TYPE OU T_PRESENT CONTENTS 
; OF SOFT SWITCH REGISTER 
; TYPE “NEW? 


° 


3 mS 
:BR IF YES(START OVER) 
:;IF CNTL G GET NEXT CHAR 


;IT MUST A,’ A DIGIT SO CLR FLAG 
SONLY O-7 ARE LEGAL SO MASK OFF BITS 
;SHIFT Re 3 TIMES 


3R00 LAST CIGIT 


0040 


? 
o 


>= 0 0 b—< bb bb pe bs 9 = b= Bo po Be bo pe po he 


+ +b <b 
furufuru 
“Ooo 
cowao 


CO4 


Ee 


PALER EEO E 


™“ 
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007762 000752 BR CKSWRY ;GET IN XT CHARACTER 

is 4 ie? oo2002 000006 4§: MOV #8. START, 6(SP) ib TYPED SO GO TO START 

7 S$: TST RY 1S FLAG CLE 

007774 901902 6$ TOOT 

007776 010277 171200 HOV R2, aSWR it YES THEN wire NEW CONTENTS TO SCFT SuR 

010002 005037 910016 6S: CLR SWELG :CLEAR TYPEOUT 

910006 012604 MOV (SP)+,R4 RESTORE RY 

10010 012603 MOV (5P)+'R3 :RESTORE R3 

010012 012602 MOV (§P)+'Re "RESTORE Re 

019014 000207 CKSWRS: RTS PC : RETURN 

010016 cooo00 SWFLG: O 

010020 105777 171160 INCHAR: TSTB aTKCSR 

016024 100375 BPL 

010026 017703 171154 MOV STKOBR. R3 

010032 105777 171152 TSTB = ATPCSR 

010036 100375 SPL -4 

010040 010377 171146 MOV R3. ITPDBR 

910044 042703 900200 SIC #BtT7,R3 

0100S0 900207 RTS p 

010052 90000: SOFTSW: 1 

910c54 0 oo2 -BYTE 6,2 

N:09S6 o00176 SWREG 


BOY 
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5s 

le? RO TI YCLE” THR TO 16 OMC11°S 
ler Tals ROUTINE rs s Ue THe CON CONTROL A OL “AOORESS Ai. ait “QIAGNOS IC 

t 

1276 BE BE RUN Preet BEFORE: EO PR THG "Fie DIAGNOSTIC FOR THE 
1277 SETUP NECESSARY. 

iB : 

1280 010060 005737 001306 CYCLE: TST DMACTV ;ARE ANY DMC11’S TO BE TESTED” 
1281 010064 001004 BNE 1$ : : 

1282 010066 104402 007154 TYPE ,NOACT “NO DMC11°S SELECTED!! 

1283 010072 900000 HALT ‘STOP T : 

1284 010074 000776 BR 2 ‘DISQUALIFY CONT. SW. 

1285 010076 000241 1S: CLC “CLEAR PROC. CARRY BIT. 
1286 010100 006137 001316 ROL RUN ;UPDATE POINT 

1287 O10104 S37 001316 ADC :CATCH CARRY FROM R 

1288 010110 062737 000004 001322 ADD #4, MILK ‘UPDATE POINTER 

1289 010116 37 000010 001320 ADD #10, CREAM “UPDATE ADDRESS POINTER. 
1290 010124 022737 001700 001320 CMP 80M! MAP+200, CREAM 

1291 010132 001006 BNE 23 ;KEEP_ GOING: NOT ALL TESTED FOR. 
1292 010134 012737 001500 001320 MOV #OM.MAP,CREAM  :RESET RODRESS 

1293 010142 012737 001702 001322 MOV BCNT.MAP MILK RESET PAS OBB UNT POINTER 
1294 010150 737 001316 001306 2s: BIT RUN, DMACTV :15 FAIS ORE ACT IVE? 

1295 010156 001747 BEQ 1$ :B NO 

12% 010160 013700 001320 MOV CREAM, RO :GET ADDRESS POINTER 

1297 O10164 013702 001322 MOV MILK, Re GET PASS COUNT POINTER 
1298 010170 012037 OO14O4 MOV (RO)+, DMCSR LOAD SYSTEN C TRL. REG 

1299 010174 011037 001374 MOV (RO) .OMRVEC LOAD 

1300 010200 042737 177000 001374 BIC #177000, DMRVEC :CLEAR SSMNTED BITS 

1301 010206 012037 001366 MOV (RO)+, STATI ‘LOAD STATI 

1302 010212 012037 001370 MOV (RO)+;STATe :LOAD STAT 

1303 010216 012037 901372 MOV (RO)+,STATS ‘LOAD STAT3 

1304 010222 012237 001230 MOV (R2)+;PASCNT LOAD PASS COUNT | 

1305 010226 012237 001232 MOV (Re), ERRCNT § :LOAD ERROR COUN 

1306 010232 012700 000002 MOV RO’ :SAVE CORE THIS Maye 

1307 010236 913737 OO1404 001406 MOV pacer DMCSRH 

1308 910244 001406 INC M 

1309 010250 013737 OO1406 001410 MOV OMCSRH, OMCTL 

1310 010256 001410 INC 

1311 010262 013737 001410 ooL41e MOV OMCTL, OMPO4 

1312 010270 060037 001412 ADD RO. OMPO4 

1313 010274 013737 OO1412 001414 MOV DMPOM DMPO6 

1314 010302 001415 ADD 0, OMPO6 

1216 010306 013737 001374 001376 MOV DMRVEC,DMRLVL =; PTY LVL 

1317 010314 060037 001376 ADD RO, OMRLVL : 

1318 010320 013737 001376 001400 MOV DMRLVL,DMTVEC :TX VEC 

1319 010326 060037 001400 ADD MTV ; 

1320 010332 013737 001400 o01402 MOV OMTYEC.,OMTLVL =: TX LVL 

132} 010340 060037 001402 AOD RO, OMTLYL 

1323 910344 032737 o00002 601226 BIT #SWO1,STRTSW ;IS TEST NO. SELECTED 

1324 0103S2 O014S0 BEQ 73 :BR IF NO 

1225 919354 43: 

1326 010254 005727 ooDo4e TST ae42 :RUNNING IN AUTO MODE? 


EQ4 
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1327 010360 O0104S BNE 7$ :BR IF YES 
1328 010362 104402 005672 TYPE MCRLF se war te 
1336 016398 Boel AyetN 
1331 010372 104405 PARAM 
1332 010374 
1333 010376 O01 1000 
1334 O10400 O0le26 TSTNO 
1335 010402 .BYTE O 
1336 010403 001 ‘BYTE 1 
1337 O10404 012700 012320 MOV #TST1,RO 
1338 O10410 022710 Ss: CMP (PC) +; (RO) :CMP FIRST WORD TO 12737 
1339 010412 012737 MOV (PC)+'a(PC)+ 
1340 O10414 001020 BNE 6$ :BR IF NOT SAME 
1341 O10416 023760 001226 o00002 CMP TSTNO, 2(RO) ;DOES TSTNO MATCH? 
1342 010424 001014 BNE R IFN 
1343 010426 022760 001226 000004 CMP #TSTNO,4(RO) ‘1S Last WORD OK? 
1344 010434 O61010 BNE 6$ : BR 
1345 010436 010037 001214 MOV RO, RETURN IT IS ql LEGAL TEST SO DO IT 
13468 O10442 104402 005755 TYPE M 
1347 O10446 042737? O00002 001236 BIC bSWO1, STRTSW 
1348 O104S4 O00412 BR 9$ 
1349 019456 005720 6$: TST (RO)+ :POP RO 
1350 O10460 O20027 016224 CMP RO,#TLAST+10 § :AT END YET? 
1351 O10464 001351 BNE ss" :BR IF NO 
1352 010466 104402 o0S66s TYPE MOM sYES ILLEGAL TEST NO. 
1353 010472 000730 BR 4g :TRY AGAIN 
1355S 010474 012737 012320 oc1214 73: MOV WTSTI,RETURN § ;PREPARE RETURN ADDRESS 
1356 010502 913701 901404 9g: MOV DMCSR: RI :R1 = BASE DMC11 ADDRESS 
1357 919506 000177 170502 IMP JRE TURN GO START TESTING. 
1359 
1360 ;ROUTINE USED TO “AUTO SIZE” THE DMC1! 
1361 :CSR AND VECTOR. 
1362 :NOTE: THE CSR MAY BE ANY WHERE IN THE FLOATING 
1363 : ADDRESS RANGE (180000: 164000) 
1364 : AND THE VECTOR MAY BE ANY WHERE IN THE 
1365 ; FLOATING VECTOR MRANGE (300:770) 
1366 : 
1367 
1368 010512 AUTO. SIZE: 
1362 010512 oo000S RESET ; INSURE A BUS INIT. 
1370 019514 012792 001590 CSRMAP: MOV at. MAP, R2 “LOAD MAP POINTER. 
1371 019520 905022 1S: CLR (R2)+ :2ERO ENTIRE MAP 
1372 019522 022702 001700 CMP #0M. END, R2 ;ALL DONE? 
1373 010526 001374 BNE 1$ R IF NO 
1374 010530 005037 9001310 CLR DMNUM ‘SET OCTAL NUMBER CF DMC11°S TOO 
i375 010534 012702 001500 MOV #0M. MAP, Re :Re POINTS TO OMC MAP 
1376 010540 005037 001306 CLR DMACTY :CLEAR ACTIVE 
1377 010544 032737 O00001 001226 BIT #SWOO, STRTSW i GUEST IONS? 
1378 oO10Ss2 001002 BNE +6 :BR IF YES an 
1378 O10554 000137 011252 IMP 7$ :IF NO SKIP QUESTIONS 
1380 O10560 012737 00000! oolese MOV #1, TEMPS :START WITH | 
13€1 O10S6E 104403 INSTR 
lie O19€70 O064s0 NUM 


ono 


FE. 


Ree 


vo 
~ 
- 


FOY 


BeBSR 


2B 


b= b= b+ pe Be pe pe ho he be pe 
~ 


WWW 
RL 


— 
Bas 
ONNOOKOKVVOVWVOOOVOVOOVOO 000000 


Ob bb bb 0 0 be bb be he bo he be ho be ee 


ONVDOVOVOOOOOVOOOOOV OO VMOVVOOOVOVOVOOVOVOVOV0000 
ee ee ee 


- 
oOo 
N 
“) 
ao 


CY11 30(1046) 11-JUL-77 29 
16-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
0572 104405 
0574 01 
0576 20 : 
9690 1252 EMP 
600 .BYTE 0 
0603 001 “BYTE 1 
O04 613737 001252 001310 MOV TEMP3, DMNUM :OMNUM = HOW MANY 
le 104402 0O005672 12$: TYPE | MCRLF 
0616 104410 CONVRT : TYPE WHICH DMC IS BEING DONE 
0620 O12002 WHICH : TEMPS IS WHICH DMC 
0622 905237 001256 INC TEMPS 
0626 104403 INSTR 
0630 006519 
0632 104405 PARAM 
0634 160000 160000 
0636 164000 164000 
0640 001254 TEMPY 
0642 600 BYTE O 
0643 001 Sig ae 
0644 013722 O01254 MOV TEMPY, (Re) + sSTORE CSR IN MAP 
0650 i04403 INSTR 
0652 S26 
9654 104405 PARAM 
0656 00 
O&60 000776 7 
0662 001254 TEMPY 
O64 000 -BYTE 0 
0665 001 "BYTE 1 
0666 013712 001254 MOV TEMPY, (R2) :STORE VECTOR IN MAP 
0672 104402 108: TYPE 
0674 006547 PRIG :ASK WHAT BR LEVEL 
0676 004737 012266 JSR PC, INTTY :GET RESPONSE 
0702 022703 900024 CMP #24,R3 : 
0706 101014 BHI SOS :BR IF LESS THAN 4 
0710 022703 o000e7 CMP 827,R3 : 
0714 103411 BLO SOs ‘BR IF GREATER THAN 7 
0716 012704 000011 MOV #11,R4 !R4Y = NUMBER OF SHIFTS 
0722 006303 ASL R3 :SHIFT R3 LEFT 
0724 005304 DEC RY ‘DEC SHIFT COUNT 
0726 001375 BNE 4 :BR IF NOT DONE 
0730 042703 170777 BIC #170777,R3 :BIC UNWANTED SITS 
0734 OS0312 BIS R3, (R2) :PUT BR LEVEL IN STATUS MAP 
0736 900403 BR 3$ : CONTINUE 
0740 104402 SOs: TYPE : 
9742 OOS&EE MOM :RESPONSE IS OUT OF LIMITS 
0744 000752 BR 10$ TRY AGAIN 
O74 104402 QS: TYPE 
0750 O06606 CRAM :DOES DMC HAVE CRAM? 
0752 004737 012266 JSR PC. INTTY :GET REPLY 
0756 022703 000!21 CMP #131,R3 
0762 001427 BEG 9$ YES 
O764 022703 o00116 CMP #116,83 :NO 
0770 001403 SEQ 40$ :NOT AY OR N 
0772 104402 TYPE 
ar” cbt MOM ;TYPE =?" 


oos 
0907E3 BR 8s ;ASK AGRIN 


DZDMH 


DZOMH. Pl 
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RBRIRS TSS 


Ra coRERBoING ERE MERE 


PORES 2ZNSFERELVSSFESRNKY 
fu 


OONDOOVOOOOOVOVOOVO OOO OOV OOOO OOOO VOKOKOOKDVOOOOVOVCOOOVOOVOVOOOO0000 ~—- 
TUTUTUNITUTUNY ob bb bb 8 8 0 0 


rv 

ee od 

loa of a0] on) 
“N 
Oo 
un 
& 


p90000 


Oleebé 
000122 


000114 


oocode 
100000 
ass 
co0d22 
000116 


019000 
020090 
012266 


000131 
000116 


040000 
040000 


0012eS4 


11-JUL-77 


ooooc4 
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GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 


40$: 


41$: 


3$: 
16S: 


Wu) 
Or 
win 


— 
“3 
we 


—e- 


wc 
wwe 


PC yNtTy 
#122, 


16§ 
8214,R3 
41$ 


40$ 
@BIT1,4(R2) 
sBIT15, (Re) 
PC INTTY 
#21. 

Tt aes 
#116,R3 
32$ 


16% 
seIT 12 (Re) . 
(R2)+, [Re 


#81713, (R2) 
PC INTTY 
8131,R 
173 
116,R3 
18$ 


303 | 
#BIT14, (R2)+ 
198 

#81714, (RZ)+ 


6) 
1 
TEMP4, (R2)+ 


;TRY AGAIN 

;SET BIT] IN STAT3 

; CONT 

;SET BIT 15 IF CRAM 

; ASK pal es LINE UNIT 
GET REPL 


‘ig 


“-— 
;°N” 
iIF NOT A 1,2 OR N TYPE ”°™ 
Y AGIAN 
BIT 12 IN STATe IF NC LU 


SET 

: POP OVER Er ATS AND STAT2 
;SET BIT 13 IN STAT2 IF MS20e 
sASK IF | LOOP BACK IS ON 

GET | REPLY 


3N 


iv NOT Y OR N TYPE “7 


AGAIN 
TURNAROUND IS CONNECTED 
;NO TURNAROUND 


OO4S 


HOY 


DZDMH «= MACY11 3011046) Ll-JUL-77 12:32 PAGE 31 PAGE: COME 
DIDMH. P11 16-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 

1495 011220 900377 377 

tig Bt}s8q COL g ae Ete og 

1498 011225 001 1: oo 

1499 Ollecb L137e¢ 001254 MOVB TEMPY, (R2)+ : STORE SWITCH PAC IN MAP 

1500 Olle3se 00572 TST (Re)+ :POP OVER STAT 

1501 011234 005337 001252 33S: DEC TEMP3 : DEC pM COUNT 

1502 011240 001402 BEQ 34$ :BR IF DONE 

1503 Olle4¥2 000137 010612 IMP 12$ : JUMP IF NOT 

1504 011246 000137 011702 34S: IMP 13$ : CONTINUE = 
1505 O11eS2 012701 160000 7$: MOV #160000, R1 :SET FOR FIRST ADDRESS TO BE TESTED 
1506 0112568 012737 011774 o90004 MOV 86S, 084 !SET FOR NON-EXISTANT DEVICE TIME SUT 
1507 011264 005011 2$: CLR (R15 ;CLEAR SELO 

1508 011266 9005711 TST (R1) -IF DMC11 DMCSR S/8 0 

1509 O11e70 901172 BNE 3$ :IF NO DEV ; TRAP TO 4. IF NO BIT 2 THEN NO DMCL 
1510 O11e72 006 CLR 6(R1) :CLEAR SEL 

1511 O11276 005761 O00006 TST 6(R1) :IF DMC11 THEN DMRIC $/8 =O! 

1512 011302 O011 3 3$ BR IF NOT DMC1! 

1513 011304 012711 od2000 MOV #BIT10, (RIL) OMO 

1514 011310 1 oo0004 CLR 4(R1) ‘CLEAR SEL4 

1515 O11314 012761 125252 900006 MOV alesese (RL) ; WRITE THIS TO SELE 

1516 011322 052711 20000 BIS #8IT13 T 

1517 011326 022761 125252 000004 CMP #25288. Stan WAS IT ert TEN? 

1518 011334 OO1004 BNE 21$ -IF NO IT IS NOT CRAM 

1519 011336 OS2762 100000 oDD00e BIS #BIT15,2(Re2) :SET BITIS IF CRAM 

1520 011344 000431 BR 225 

1521 O11346 012711 001000 218: MOV #B8IT9, (RL) ;SET ROMI 

1522 011352 012761 100417 900006 MOV #100417,6(R1) PUT INSTRUCTION IN SEL& : 
1523 011360 012711 001400 MOV abi TotelTe (R1) :CLOCK INSTRUCTION (MICRO PROC PC TO Cc) 
1524 011364 012711 o02000 MOV #BITIO, (R13 :S 

011370 76 00 oocode CMP 626, PIRI 1s 1 LOCAL CROM 

ve : 

1258 ot 1328 ES O16S20 00006 id ff8s20,6(R1: 1S  ERoTE CROM? 

1528 O11406 001410 BEQ : BR TF YES 

1529 O11 022761 177777 og0006 CMP #-1,6(R1) :NO CROM? 

1530 011416 OOF404 BEQ 22$ BR if YES 

1531 011420 900Si6 33 :NOT A DMC 

1532 011422 OS2762 900002 oD00re 238: BIS eT BIT 1 IN STATS ia 

1533 AT THIS POINT it i wbssureo THAT RI HOLDS R DMCI1 CSR ADDRESS. 

1534 011430 010122 22: MOV TORE CSR IN CORE TABLE. 

1535 011432 012711 901000 158: MOV a6}, (RD :CLEAR LINE UNIT LOOP 

1536 011436 005061 o00004 CLR 4(R :CLEAR PORTY 

1537 O11442 012761 ileell3 oo0006 MOV e122113 &(R1) OAD INSTRUCTION (CLR DR) 

1538 011450 052711 ooo4oo BIS #BITS, (RL) :CLOCK INSTRUCTION 

15339 011454 012761 021264 00006 MOV toe ets 6(R1) LOAD INSTRUCTION 

1540 011462 052711 od0400 BIS sBIT8, (Rl) :CLOCK INSTRUCTION 

1541 O11466 122761 000377 900004 CMPB 8377, G(R}) -IS IT ALL ONES” 

1542 011474 001003 ONE +10" :BR IF NO tate y. 
1543 011476 OS2712 010000 BIS #1112, (R2) -IF YES, NO LINE UNIT, SET STATUS BIT 
1544 011502 000436 BR 2 

1545 011504 032761 oo0002 opgD04 BIT sSIT1,4(R1) :I1S SWITCH A ONE? 

S46 011512 001403 BEQ +1 jBR IF Mé201 - 

1547 O11514 712 o60000 SIs #BITIZ'BIT14,(R2) ;MBe0e onesune CONNECTOR 

154@ 011520 o0042 ge 29$ :09N NECTOR 

1549 oi 1bee 032761 o00010 990004 IT 8BIT3,4(R1) ; hg aedarenes. ; 
i550 o1is } 081023 BNE 203 :88 IF at NO CONNECTOR .ON TINE? 


DZOMH = =MACY]] 30(10%6) 11-JUL-77 
DZOMH. P11 16-MAY-77 09:54 


feed Biter Bisset TBBiTy BBBObE 
1553 011546 0527 000400 


15 ll 
1554 O11 761 1264 000006 
fee Bttees B43591 ooosaG 
1538 Ot ; 032761 000010 ooo004 
122s 011259 Be715 ovooo0 
i$S9 011600 005722 
1560 0116 012761 021324 00000 
1561 011610 012711 001400 
1562 011614 156122 O00004 
1563 011620 012761 021344 900006 
1564 011626 012711 0014 
1565 011632 156122 900004 
1566 011636 005722 
1567 011640 005011 
1568 O11642 005237 001210 
1569 O1164%6 022737 000020 001310 
1570 011654 O0141¢ 
1872 O11ee0 ObEbEt 

eee 

1258 6+ 1Be6 Bp3o8 vauayta 
1574 011670 022701 164000 
1575 011674 001402 
1576 011676 000137 011264 
1577 011702 005037 001306 
1578 011706 0057 00131 
1373 011712 go14e3 
1 011714 013701 901310 
1581 011720 010137 001314 
1582 011724 o00e4 
1583 011726 006137 001306 
1584 011732 o0Se 001306 
1585 011736 005301 
1586 011740 001371 
1587 011742 012737 OO0006 900004 
1588 011750 013737 9013 001312 
1589 011756 137 012010 
1590 011762 104402 005760 
1591 011766 oOS000 
1592 011770 0000 
15693 011772 000776 
1594 011774 O12716 O11664 
iS9S 012000 o000 
1596 
1597 o12002 1 : 
1598 912004 002 oe 
1393 012006 o012e56 
1601 912010 932737 000001 001236 
a pi seie eet 000340 900022 
1604 012026 012737 Oleede 090020 
1605 012034 012702 001500 
1606 012040 012700 000200 
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GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 


20$: 


3$: 
14S: 


13S: 


4§: 


S$: 


é$: 


WHICH: 


VECMAP : 


1132013 6(F R1) 


#8IT8 
reat bir) 


s81T3, 4eRL) 
isi (Re) 


#10,R1 
#164000,R1 
13$ 

2s 

DMACTV 
DMNUM 


$ 
MNUM, RL 
R1, SAVNUM 


DMACTY 
DMAC TV 

R} 

4§ 

#6, a84 
DMACTV, SAVACT 
VECMAP 

MERR2 
RO 


ay 
#14$, (SP) 


2,e 


sSWOO0, STRTSW 


cL eet 
‘LOAD INSTRUCTION 
:CLOCK INSTRUCTION(SET OTR) 
:LOAD INSTRUCTION 
CLOCK INSTRUCT 1ON( READ MODEM REG) 
*BR IF MEO NO EONNECT TOR 
: SET STATUS BIT FOR CONNECTOR 
:POP POINTER 
NSTRUCTION IN PORT 


:PUT I 
: PORTY+ 
;STORE DOCMP LINE # IN TABLE 
sPORTE® INSTRUCTION 


; CLO TR 
STORE BMB7 9R0 IN TABLE 
:POP OVER STAT3 


CLEAR ROMI 
; UPDATE DEVICE COUNTER 

DEV FOUND? 
‘YES DON ! LOOK FOR ANY MORE. 
:CLEAR BIT 10 


SEER tet POINTER ADDRESS 


iSOne IF NOT 


;WERE ANY DMCL1'S FOUND AT ALL? 
SERROR AUTO SIZER FOUND NO DMC1I‘S IN THIS 


;SAVE NUMBER OF DEVICES 


;GENERATE ACTIVE REGISTER OF DEVICES. 
:SET THE BIT 


;BR IF MORE TO GENERATE 
ORE CTOR 


;REST TRAP VE 
; SAVE Te REGISTER 
;GO_FIND THE 


NO VECTOR NOW. 
SNOTIFY OPR THAT NO DMC11°S FOUND. 
; MAKE DATA LIGHTS ZERO 
TOP THE ot 


DISABLE CONT. Sw. 
;ENTERED BY NON-EXISTANT 
;RETURN TO MAINSTREAM 


TIME-CUT. 


;SET I0T TRAP PRIO TO 7 

:SET I0T_TRAP yet Toe 

iSET SOFTWARE POINTER 
;FLOATING VECTORS START HERE. 


JO4 


DZDMH = MACYL1 30(1046) L1-JUL-77 12:32 PAGE 33 PAGE: O046 
DZDMH.P11 © 16-MAY-77 09:54 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
tPA HES Ht 6} 3 anual is: MOY Aye BH, GEG ARE AOL ENG Bector area 
000004 MOV #4, (R1)+ ;WITH .+2; IOT 
1610 022021 CMP (RO)+, (R1)+ ‘ADD 2 TO RO 4R1 


thted! — gI'os Ry #1000 ;BR IF MORE TO FILL 


be 
ow 
—+- 
tu 
oo°O 
set 


1613 737 001246 V MACTV, TEMP1 TEMPORALLY 
Teis BtSR8G Bazas> BRIE 25; fon SERB] ‘Bane ork Br 

ie Seige Gees my Bey cig eases 

ei6 bie ot G33 Bpgbas 177776 MOV BACoC CRY). Ps Be Noe} 

1618 O12114 011201 MOV (Re), RL 

1619 012116 012761 o00200 oD0004 MOV #200, 4(R1) 

1620 012124 012711 001000 MOV #8179, (R1) ;SET ROMI 

1621 012130 Ole761 121111 o00006 MOV #121111,6(R1) PUT INSTRUCTION IN PORTE 
1622 912136 012711 001400 MOV #BIT9'BITB, (R1) :FORCE AN INTERRUPT 

1623 Olel42 105200 7$: INCB = RO peu 

1624 Oieis4 001376 BNE .-2 OR TIME TO INTERUPT 

1625 012146 162704 o0000e SUB #2,R4 : GET NEXT LOWEST PS LEVEL 
1626 O121S2 001404 BEQ 6$ :BR IF BY = 9 

1627 0120154 016437 012252 17777 MOV BRLVL(R4),PS § MOVE NEXT LOWER LEVEL IN PS 
1628 Ol2162 000767 BR ?BR TO DEL 

1829 o12164 052762 005300 oo00002 6$: BIS #5300, 2(R2) :NO INTERUPT ASSUME 300 AT LEVEL S AND FIX OMC1 
1630 012172 O0SoO1! 33: CLR (R1) CLEAR 

1631 012174 062702 900910 ADD #10,R2 : POP SOF HERE POINTER 

1632 012200 000735 BR 2 :KEEP GOING 

1633 Oleed2 0Sibbe o09902 4g: BIS (SP) 2(R2) :GET VECTOR ADDRESS 

1634 012206 O42762 000007 oDD002 BIC tR 3C AR JUNK 

1635 012214 O1640S 012254 MOV BRC Wein), RS :GET BR LEVEL OF DMC11 

1636 Ole220 006305 ASL s SHIFT LEVEL 4 PLACES 

1637 Ole2ze2 006305 ASL Re -TO THE LEFT FOR THE 

1538 012224 006305 ASL RS ‘STATUS TABLE 

1539 Ol22e6 006305 asL RS 

1640 912230 042705 170777 BIC #170777, RS ;CLEAR UNWANTED BITS 

1641 012234 OS0S62 ood002 BIS RS. 2(Re} :PUT BR LEVEL IN. STATUS TABLE 
1642 012240 O22626 CMP (Spi (SP)+ :POP IOT JUNK OFF STACK 

1643 Olee¥2 012716 012172 MOV $, (SP) :SET FOR RETURN 

1644 Olee4%6 900002 RTI 

1646 Oleeso 000207 S$: RTS PC sALL DONE WITH “AUTO SIZING” 
1647 Ol ooc000 BRLYL: © sLEVEL 0 

1648 012254 LEVEL O 

1649 012256 000200 200 LEVEL 4 

1650 012260 O00240 240 LEVEL S 

1651 Ole262 000300 300 : LEVEL : 

1652 O1l2264 000340 340 LEVEL 7 

ee 

1655 012266 105777 166712 INTTY: TSTB  aTKCSR :WAIT FOR DONE 

1656 012272 100375 BPL - 

1657 012274 017702 166706 MOV STKOBR, R3 :PUT CHAR IN R3 

1658 012300 105777 166704 TSTB aTPCSR :WAIT UNTIL PRINTER IS READY 
1659 012304 100375 BPL aay 

1660 012306 010377 166700 MOV PDBR sECHO CHAR 

1661 012312 042703 o00240 BIC aptirier's, R3  :MASK OFF LOWER CASE 

léb2 012216 O000207 RTS : RETURN 


OZDMH = =OMACY11 30(10%6) LI-JUL-77 12:32 PAGE 34 PAGE: 0049 
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1663 


LOY 


Z0MH MACYLL 30(104%6) Ll-JUL-77 12:32 PAGE 35 PAGE: o0s0 
DZDMH.P11  16-MAY-77 09:54 FREE RUNNING TESTS 
ieee 
1666 s RHRAEARAAAARALERAHAE SRE L ALE ES ie ] RERERRERESE EEE REESE 44 44244 
1667 ; #EREE REE RUNNING FLAG NODE DATA T EST 
| RIFY RECEIVED DATA 
tBe tel Ne RRS ONL T L0o “iS Le ror t tht s Est. 
1670 is ALL FOLLOW FR : 
BS HONG OW poe MFT ves Py R “ie Taian GP FEF mame TEST 
1673 :AWILL FAIL ON A KMC 00 FAST) THEN YOU MUST 
1874 a iy a! t arto OF cra ‘i the sth TUS MAP. ALSO THE KMC 
1675 :#MUS vE HE afi CRO-CODE LOADED BY PREVIOUSLY RUNNING 
16 ae LOADING AND STARTING DZDMH 
16 TH oe Th zie 
1678 elena tatekaneneeiannnettneasenecnineenmeuneniemmiennneiee 
168 ; TEST 1 
1e85 O1Saoe BLS7a> Brs4od DOLeTE STI: OV a4 TSTND 
l Rl CONTAINS BASE DMC11 ADDRESS 
1685 012334 032737 100000 001366 BIT #B1T1S,STATL 15 IT A DMC? 
1686 012342 001406 BEQ +16 YES 
168 dies 032737 000001 901372 BIT #9170, .STAT3 :KNC ITH BITO SET? 
ta: ptS3e5 137 013402 MP i4$ SKI TES 
1690 Ole 032737 010000 001366 BIT wBIT12,STAT1 | :LU PRESENT? 
1691 Ole 001372 BNE - "BR IF NO 
1692 012370 013700 021370 MOV RCOUNT , RO !CLEAR RECEIVER BUFFER 
1693 =: 374 92 ADD #2, RO :CLERR 2 MORE LOCATIONS 
1694 Ol 1 13 MOV #RBUF , R2 ‘CLEAR OUT RECEIVE BUFFER 
1695 012404 105022 10S: CLRB (Re)+ iCLEBR BUFFER 
{E38 1241 l Be 10$ ; 
1698 Ole4i2 605037 021316 CLR TFLAG SET TFLAG TO 0 
1699 012416 005037 021320 CLR RFLAG RFLAG TO 0 
1700 Ole422 012711 O40000 MOV #B1T14, (RL) 'MASTER CLEAR 
1701 Ole426 100000 0012366 BIT #BITIS.STATI ; CRAM? 
1702 012434 001402 BEQ +6 R IF NO 
l 012436 012711 100000 MOV #BITIS, (RL) fF CRAM SET RUN 
1704 Ole442 105227 O00000 INCB 8&0 s DELAY 
170S 012446 001375 BNE _-4 :DELA 
1706 012450 OO1416 CLR TEMP :GET SET. TO DELAY 
17 b1ee4 005711 18: TST (RL) "RUN SET? 
17 l 00405 BMI +14 iBR IF YES 
1708 O1e460 2 001416 INC TEMP LAY de 
154? Bisdee 984373 Bye 14 BRIE NO Run ae 
ae bei peer 4o43 et Sou, (RI) TRY, AGAIN 
as 
1714 01 atti L TEMP GET set 48 becay 
ais b1esde 105711 2s: TSTB (RL) :ROI SE Bere 
ai 
318 O10. 001416 its TE ‘Ac reyes 
1718 Ole512 001373 BNE 2g :BR IF NOT DONE 
1719 012514 194014 HLT 14 !ERROR,RDI NOT SET 


bern 


MACY11 30( 1046) 
093 


ZOMH.P11 = 16-NAY- 
1720 012516 012761 
1721 012524 005061 
1585 O15e34 
1704 012540 105711 
1725 o1e5¥2 1 
1726 012544 37 
1727 012550 001373 
1728 O1e5S2 105761 
1723 012556 10001 
1730 012560 016137 
1731 012566 016137 
1732 012574 104016 
1733 012576 000137 
1734 012602 104014 
1735 012604 
1539 BiSe73 1eeFt] 
1738 Oleble 100376 
154g Bisee0 Tas7t1 
1741 012624 105711 
1742 Ole626 100776 
1743 012630 152711 
1744 012634 005037 
1745 O1e640 105711 
174 D124 100404 
(bag O1Ses0 B01379 
1749 Ole652 104014 
1750 012654 012761 
1751 Olebb2 013761 
1752 012670 142711 
1753 012674 005037 
1754 012700 105711 
1755 Ole702 100004 
1756 012704 005237 
1757 012710 001373 
1758 Ole7le 104014 
1759 012714 152711 
1760 012720 005037 
1761 Ole7e4 105711 
1762 012726 100404 
1763 012730 005237 
1764 012734 001373 
1765 012736 104014 
1766 012740 012761 
1767 Ole746 013761 
1768 012754 142711 
1769 012760 005037 
1770 012764 105711 
1771 012766 100004 
1772 012770 005237 
1773 001373 
1774 O1e776 104014 
1775 013000 005037 


021440 
000006 
Boise 


001416 
ooc0de 


ooo004 
000006 
01340e 


000041 
Boose 

40 
po0044 
O0141E 
001416 


021372 


OC1416 


- pti 12:38 ee 


oo0004 


001eSe 
001254 


o0co04 
000006 


000004 
000006 


Age 36 
UNNING TESTS 


3$: 


i 


64S: 


6S$: 


4$: 


S$: 


6$: 


7$: 


16$: 


MO4 


#BASE,4(R1) 
o6 tet) 

§ 

TEMP 

(R1) 

8$ 

TEMP 

3$ 

2(R1) 


18$ 
4(R1), TEMPS 
ot, 


14$ 
14 


Fa} 


PAGE: 


;SET UP BASE ADDRESS 
;CLEAR COUNT 


i CLEAR Q 

: SET TO DELAY 

;1S ROI GONE? 

:BR IF YES 

: INC peLny 

BR IF NOT DONE 

15 THERE A CNTL O ERROR 


:BR 

:SAVE SEL4Y FOR TYPEOUT 
;SAVE SEL6 FOR TYPEOUT 
:CNTL 0 bon OR 

FATAL ERROR STOP 
ERROR RDI STILL SET 


Mat PoR-ROY 


; INC _ DELAY 
:BR IF DELAY NOT DONE 
ERROR ROI NOT SET 

sb REC BA 
LOAD REC COUNT 
;GET SET TO DELAY 

R ONE? 


LOAD ai perren 
:LOAD COUN 


Rar 
CET SET TO DELAY 
;ROI_ GONE? 
BR IF YES 
; INC peLny 
T DONE DELAY 


ERROR RDI out SET 
:GET SET TO DELAY 


00S} 


NO4 


MACY11 30(1046) 11-JUL-77 12:32 PAGE 37 PAGE: 
RSBMHSPLl”  tecnAve7? og:es Free RUNNING TESTS nce 
177% 913004 012737 990022 001246 - NOV #22, TEMP GET SET FOR LONG DELAY 
1778 pi shte attra ane BMI 17$ ‘BR IF YES 
1779 013020 37 OO1416 INC TEMP - INC DELAY 
1780 013084 00137; NE 1$ :BR IF DELAY NOT DONE 
1781 Ol 005337 001246 if EC EMP1 ‘DEC DELAY COUNT 
1782 013032 001367 BNE 11$ BR IF DONE DELAY 
1783 013034 104014 HLT 14 ERROR T SET 
1784 Ol 016137 oo0002 001250 17$ MOV 2(R1), TEMP2 ‘SAVE SEL2 
1785 013044 001001 +4 :BR IF OK 
1786 013046 104014 HLT 14 ‘ERROR!!! SEL2 = reese 
1787 0130SO 032761 o00004 oD0002 BIT #81T2,2(R1) ‘REC OR XMIT? 
1788 013056 001032 BNE 13$ *BR IF REC 
1789 013060 005737 021316 128: TST TFLAG FIRST TIME HERE? 
1790 013064 001401 BEG +4 ‘BR IF YES 
1791 013066 104014 HLT i4 ‘ERROR MULTIPLE XMIT DONES 
tras Gusere Glare, Boooor SBME Bie Tei, Bena. 
1794 pt 104 baeabt BEO ¢ we ‘BR tf Ko 
1998 QISII8 feerel 021324 00004 HS eur.ucnt) att Ber connect? 
1599 piste at 1 a +4 -BR IF res 
1798 013120 104014 HLT i4 :XMIT BA ERROR 
1799 013122 023761 021322 o00006 CMP TCOUNT, 6(R1) :COUNT OK? 
1800 013130 001401 BEQ +4 : BR IF S 
1801 013132 104014 HLT i4 !XMIT COUNT ERROR 
1802 013134 142761 000207 oDD002 BICB #207,2(R1) ;CLEAR RDO AND BITS 0-2 
1803 013142 53 BR 1S$ 5 CONTI 
1804 013144 005737 021320 13$: TST RFLAG FIRST TIME HERE? 
teDe orale | touare -; Ean i BPROR MICTIPLE REC DONES 
1 Bt ate4 Net 177777 021320 thy #-1, RFLAG ERR RFLAG i -1 
1808 013162 132761 O00001 o00002 BITB s#BItO,2(R1) IS IT CNTL O 
1809 013170 1401 BE +4 : Ir No 
1810 013172 104014 HL i4 "RECEIVE ERROR 
1811 013174 022761 021372 oD0004 CMP SRBUF ,4(R1) “REC BA CORRECT? 
1812 013202 001401 BEQ +4 ‘BR IF YES 
1813 013204 104014 HLT i4 :REC BA ERROR 
1814 013206 023761 021370 000006 CMP RCOUNT, 6(R1) :COUNT OK? 
1815 013214 001401 BEQ +4 :BR IF YES 
1816 013216 104014 HLT :REC COUNT ERROR 
1817 013220 013700 021370 MOV RCOUNT, RO GET SET TO CHECK DATA 
igs bless Glens Gets mY ERS ies INTE 10 SPOE LE Bar 
1820 013234 see 1252 9S: MOV RS TERE :SAVE ADDRESS FOR TYPEOUT 
1821 013240 112205 MOVE = (R2)4,R5 :RS = XMIT 
1822 0132042 112304 MOVE  (R3)+.R4 ‘RY = RECEIVE DATA 
1823 013044 120504 CMPB !CHECK DATA 
1824 01324 001401 BEQ +4 :BR IF OK 
1825 013250 13 HLT i3 ‘DATA ERROR 
182 13e5e : DEC RO : DEC COUNT 
1B5e eas nage Bt 23) ore shou BBE 0, ELSE 
1829 013260 001401 BEG ii iT RECEIVED TO MUCH! ! 
183? Bt 3585 1835¢i po0207 op0002 BICB #207,2(R1) + ERED RDC AND BITS 0-2 


-- me ee - = oe 


DZDNMH  MACY11 30( 1046) 
DZDOMH. P11 


005737 
001640 
00S737 


SeeB ANS 


Ebed se dS trtntcinistriate 
: 


OOOO OOO VOKOVOOOOOOO0O000000 
me 
WwW 
9888 


4 
Sith 
? 

8 NS 


PRERRRRRRARRRRS Se PPPS Ee POOR DS 


& 
+ 


1865 013404 012737 
1866 Ol34le 012737 
1867 

1868 013420 

1869 013426 001406 
1870 Q13430 032737 
1871 013436 001002 
1872 013440 000137 
1873 O13444 032737 
1874 O134S2 001372 
1875 013454 004737 
1876 013460 004537 
1877 013464 021304 
1878 013466 O00044 
1879 013470 012700 
1880 013474 012703 
1881 013500 005037 
1882 013504 105761 
1883 013510 1 

1884 O13Sle 005237 
1885 013516 001372 
i886 013520 302 
i887 Oissee 001370 


16-NAY-77 09:S4 


TST RFLAG 

BEQ 16§ 

TST TFLAG 

FER Be SsHuTDOMN 

MOV #265 RO 

MOV e8AaSE+3,R1 

MOV #10, Re 

CMPB  —s- (ROS+, (R1)+ 

BNE 238 

DEC Re 

BNE 225 

BR 245 

-BYTE 6,0,0,0,0,0,0,0 
VB  BASE+3, TEMP2 

MOVB  BASE+ 5. TEMPS 

MOVB  BASE+7° TEMPY 

nove BASE +11, TEMPS 

SCOPE 


PAGE: 


DOWN DMC 
‘POINTER TO Pt Ne SOFT COUNTS 
; POINTER TO ACTUAL COUNTS 


; COUN 
;COMPARE SOFT ERROR COUNTS 
;IF ERROR BR 23 


DEC COUN 

i CONTINUE CHECKING IF NOT DONE 
ALL COUNTS OK, GET OUT 

EXPECTED ERROR COUNTS 


;SCOPE THIS TEST 


bet enema cmeemass TEST 2 ERERSSEERSEESESS ELSES SLEEES 


;#OVERUN T 


MODE SEND MESSAGE WITH NO RECEIVE 


#IN FREE RUNNING 
H#BUFFER AVAILABLE, VERIFY THAT AN OVERRUN ERROR OCCURS 
WTTIITITTITiTitiriiiriiiiiiiiiititiiiiiiitiitiitititiirii iis! 


#2, TSTNO 
MOV #1573, NEXT 


ll-JUL-77 12:32 PAGE 38 
: FREE RUNNING TESTS 
021320 15S: 
021316 
1334 
021443 21s: 
001 
22s: 
ooo 000 ess: 
000 000 
000 
021443 1250 233: 
021445 001252 
021447 001254 
0214S1 001256 
24s: 
14S: 
oocode 901226 TST2: 
013784 001216 
100000 001366 
000001 001372 
013736 
010000 001366 
022040 
022450 
000010 
000015 
001416 
ooocde 1$: 
OOl416 


BIT sBIT1S,STATL 
BEQ +16 
BIT 8BI1T0,STAT3 
BNE +6 
IMP 10$ 
BIT eB1T12, STAT! 
BNE le 
ISR Pc, BASELD 
JSR RS’ XFRELD 
TBUF 
an 
EO: 
4 a 
CLR me 
TSTB) ss @ (R11) 
BMI +20 
INC TEMP 
BNE 1$ 
DEC R3 
BNE 1$ 


:R1 CONTAINS BASE DMC1: ADDRESS 
!15 IT A DMC? 
:BR IF YES 
:KMC WITH BITO SET? 
:BR IF YES 
;SKIP TEST 
:LU PRESENT? 
:BR IF NO aah 
“LOAD ONC BASE ADDRESS 
sLOAD xmfT BAYCC 
iB 
1 RETRANSMISSION COUNT 
iELEBR SELaY COUNTER 
:1S ROY 0 SET? 
SET 
SINC DELAY COUNTER 
:BR IF NOT DONE DELAY 


:DEC DELAY COUNT 
BR IF DELAY NOT DONE 


00S2 


OZDMH = MACY] 30(10%) L1-JUL-77 12:32 PAGE 39 PAGE: C0S4 
DCOMH. P11 18-NAY-77 09:54 FREE RUNNING TESTS 

1888 013524 104014 HLT 14 sERROR, RDY 0 NOT SET 

1889 013S26 000503 BR 10$ ;GE 

1890 013530 132761 000001 000002 BITB #B1T0,e(R1) ;1S IT CNTL 0? 

1891 013S36 001002 BNE 11$ ;BR IF YES 

1892 013540 104014 HLT 14 ;ERROR, NOT CNTL O 

1893 013542 000475 BR 10$ ; CONTI a 

1894 013544 012705 000004 118: MOV s81T2,RS ;PUT “EXPECTED” IN RS 

1895 013550 016104 000006 MOV 6(R1),R4 ;PUT “FOUND” IN RY 

1896 013554 O20S04 CMP RS,RY ;1S ORUN SET? 

1897 013556 001404 BEQStséid 8S :BR_IF YES 

1898 013560 O22704 000001 CMP #1,R4 ;DATA CK ERROR? 

1899 013564 OO1465 BEQ. Ss 38 :BR IF YES 

1900 013566 104015 ts HLT 5 ;ERROR, ORUN NOT SET 

1901 013570 O42761 O00e07 00000e 12S: BIC #207, 2(R1) ;CLEAR RDO 

1902 013576 005037 O01415 CLR TEMP ;RESET DELAY 

1903 013602 005300 DEC RO ;DEC RETRANS COUNT 

1904 013604 001337 BNE ; COUNT INUE 

1905 013606 004737 O2eS0e JSR PC , SHUTDOWN ; SHUTDOWN DMC 

1906 013612 032737 Oe0000 001365 BIT #6{T13,STATI ;1S_IT_AN M8201? 

1907 013620 O01446 BEQ 10$ ;SKIP BASE CHECK IF YES 

1908 O13622 012700 013664 MOV #2S$ RO ;POINTER TO EXPECTED SOFT COUNTS ‘LOW SPEED> 

1909 013626 032737 000002 001372 BIT #S1T!,STAT3 ;1S IT HIGH OR LOW 

1910 013634 001402 BEQ 21s ;BR IF LOW e e. 

1911 013636 O12700 013674 MOV #26$,RO sPOINTER TO EXPECTED SOFT COUNTS ‘HIGH SPEED. 

121s 013642 p1s7Ok 021443 218: MOV #BASE+3,R1 ;POINTER TO ACTUAL COUNTS 

1913 013646 Ole 000010 MOV #1 ; COUNT 

1914 013652 122021 22S: CMPB (RO}+, (R1)+ ;COMPARE SOFT ERROR COUNTS 

191$ 013654 001013 BNE 23$ ;IF ERROR BR 23S 

1916 013656 005302 DEC Re ;DEC COUNT 

1917 013660 001374 BNE ees ;CONTINUE CHECKING IF NOT DONE 

1918 013662 O0042S BR 4s *ALL COUNTS OK T OUT 

1919 013664 88:8) C00 000 ess: “BYTE 6,0,0,100,0,0,0,0 ;EXPECTED ERROR COUNTS <LOW SPEED) 

1920 013667 100 000 000 

1921 013672 000 000 - 

1922 013674 000 000 077 2b$: -BYTE 0,0,77,100,0,0,0,0 ;EXPECTED ERROR COUNTS (HIGH SPEED: 

1923 013677 100 CO0 000 

19e4 013702 000 000 

19eS 013704 113737 021443 001250 238: MOVB BASE+3, TEMP2 

1926 013712 112737 O2144S 001252 MOVB BASE+S, TEMP3 

1927 013720 113737 Gel447 9001254 MOVB BASE+7 , TEMP4 

1928 013726 113737 021451 001256 MOVB BASE+11, TEMPS 

1929 013734 104017 HLT 17 

1930 013736 24S: 

1931 013736 104400 10$: SCOPE ;SCOPE THIS TEST 

i932e 013740 042761 000207 cN0G0e 138: BIC 8207, 2(R1) ;IGNOR THIS ERROR 

1933 013746 005037 001416 CLR TEMP ;RESET DELAY 

1934 013752 OO06S4 BR 1$ ; CONTINUE 

“ 

1937 ; LESEAAEREERAERERRSEHREEERH TEST 2 ReeeREERERRES EERE ERE EREETES 

193¢ ;#LOST DATA TEST 

1939 ;#IN FREE RUNNING MODE SEND A MESSAGE LONGER THAN THE RECEIVE 

194C ;#BUFFER, VERIFY THAT A LOST DATA ERROR OCCURS. 

tout 1 EERERESEREER AERA HRESEASSERSEERASRREEREDRRELREER AERA RDERERETES 

1942 


1943 ; YES’ 3 


DZDMH «= MACY1I1 30(1046) L1-JUL-77 12:32 PAGE 40 PAGE: Ooss 
DZDMH.P11  16-MAY-77 09:54 FREE RUNNING TESTS 

1944 saa ana---------- 

l 013754 012737 000093 001226 TST3: MOV #3, TSTNO 

194% 013762 012737 014236 001216 MOV #TST4, NEXT 

1947 ;R1 CONTAINS BASE DMC11 ACORESS 
1948 01 104412 MSTCLR ‘MASTER aChEAR DMC11 

1949 013772 032737 100000 001366 BIT #81715 SSTATL 31S IT A DMC? 

1950 O14 001406 BEQ !BR IF YES 

1951 014002 032737 000001 001372 BIT WBIT0, STAT *KMC WITH BITO SET? 

192 O140i0 O01 BNE +6 !BR IF YES 

1953 014012 000137 014234 IMP ios ‘SKIP TES 

1954 014016 632737 O10000 001366 BIT WB T12, STATI ?LU PRESENT? 

1955 014024 001372 BNE - :BR IF NO 

1956 014026 737 O22040 ISR PC, BASELD jLOAD onc BASE ADDRESS 
1957 014032 7 O22416 JSR RS'RFRELD sLOAD RECEIVE BA/CC 

1958 014036 021372 RBUF ; 8A 

1959 014040 20 ¢ 

1960 014042 S37 022450 JSR RS, XFRELD “LOAD XMIT BA/CC 

1961 O14O46 021324 TBUF :BA 

1%2 O140SO O00044 44 : 

1%3 014052 012703 oo0015 MOV #15,R3 DELAY COUNT 

1964 014056 005037 001416 CLR TEMP ;CLEAR DELAY COUNTER 

1965 014062 105761 o0000e2 1S: TSTB ss 2(R1) ;1S RDY 0 SET? 

1966 O14066 100407 BMI +20 IF SE 

1967 014070 37 001416 INC TEMP : INC DeLay COUNTER 

1968 914074 001372 NE 1$ :BR IF NOT DONE DELAY 

1969 014076 DEC R3 :DEC DELAY COUNT 

1970 014100 001370 NE 1$ BR IF DELAY NOT DONE 

197 O1410¢ 04014 HLT 14 ; ERROR {ROY 0 NOT SET 

19 14104 53 BR 10% ‘GET 

1973 014106 132761 900001 ocoDD02 BITB 8BITO,2¢R1) :1S 1 ONTL 0? 

1974 O14114 001002 11$ :B YES 

1975 O14116 104014 HLT 14 : BeROR NOT CNTL 0 

1976 014120 Oo044s BR 10$ : CONT INUE 

1977 Ol4le2 012705 oog0e0 118: MOV #BIT4,RS : PUT “EXPECTED™ IN RS 

1978 014126 016104 o00006 MOV 6(R1),R4 :PUT “FOUND” IN RY 

1979 014132 O20S504 CMP RS RY 15 LOST DATA SET? 

1980 014134 001401 BEG 12$ Y i 

1981 014136 104015 HLT 15 ERROR Lost DATA NOT SET 
1982 014140 004737 oO2e2s02 128: JSR PC, SHUTDOWN : SHUT i 
1983 014144 012700 O14i72 MOV #263, RO : POINTER 1p. EXPECTED Sof COUNTS 
1984 O14150 012701 021443 21$: MOV 8BASE+3,R1 POINTER TO ACTUAL COUN 

1985 014154 Ole7de o00010 MOV #10. Re 00 

1986 014160 12202! 223: CMPB (ROS+,(R1)+ : COMP ARE SOFT ERROR COUNTS 
1987 014162 001007 BNE 23S -IF ERROR BR 23S 

1988 014164 005302. DEC R2 : DE T 

1989 014166 001374 BNE 225 j CONTINUE | CHECKING i NOT DONE 
1990 014170 000421 BR 24g ‘ALL COUN 

1991 01417e 0 ooc 906 253: “BYTE 6,0,0,0,0,0,0,0 :EXPECTED TB eRe SE Nes 

1992 014175 000 000 000 

1993 014200 900 goo 

1994 014202 113737 021443 o01250 233:  MCVB BASE+3, TEMP 

1995 014210 113737 O21445 001252 MOVB BASE+S‘ TEMPS 

199% Ol4216 113737 021447 001254 MOVB  BASE+7' TEMPY 

1997 014224 113737 O214s1 OOlese MOVB  BASE+11, TEMPS 

1996 014232 104017 HLT 17 

1993 014234 2ug: 


11-JUL-77 


DZDMK = -MACY11 30(1046) 

DZDMH.P11  16-MAY-77 09:54 
2000 014234 104400 
2001 
2002 
2003 
2004 
2005 
a 
2009 
2010 
2011 014236 012737 op0004 
ele O14e44 012737 014810 
2014 o142S2 104412 
2015 014254 032737 100000 
2016 014262 001406 
2017 O14264 032737 000001 
2018 Ol4272 001002 
2019 014274 000137 014506 
2020 014300 032737 010000 
2021 914306 001372 
2022 014310 004737 922040 
2023 O14314 004537 O2e45 
2024 014320 177320 
2025 014322 140044 
2026 014324 012703 o00015 
2027 014330 005037 001416 
2028 014334 105761 00002 
2029 014340 100407 
2030 O14342 005237 o01416 
2031 014346 001372 
2032 014350 005303 
2033 014352 001370 
2034 014354 104014 
2035 014356 
2036 014360 132761 000001 
2037 014366 001 
2038 014370 104014 
2039 014372 0044S 
2040 014374 012705 900400 
2041 O14400 016104 000006 
2042 014404 0205 
2043 014406 001401 
2044 014410 1040i5 
2045 O14412 004737 d22502 
2046 O14416 O12700 O14444 
2047 Oi442e O1e701 921443 
2048 O14426 O12702 000010 
2049 O1443e 122021 
2050 014434 001007 
2051 914436 005302 
2052 O14440 001374 
2053 O14442 000421 
2054 O14444 c00 = 900 
205s o14447 Ooo O00 


00136 


00009, 


6 


e 


12:32 PAGE 41 
FREE RUNNING TESTS 


108: 


TST4: 


1$: 


11$: 


ees: 


SCOPE 


EQS 


PAGE: 


;SCOPE THIS TEST 


5 REAR RL EERE EEE EEE EEE EEE EE ay tr Y RRRARSHRRSRAE RAE SEE SESS SESS 


sETRANGHIT ae MEMO! 


ST 
Bab a A TRANSMIT BA a TIME OUT 


j VERIFY THAT A NRONCEXESTENT MEMORY ERROR OCC 
+ SEAAASEAAAARRARELALERAALAAAAARSARAALARSLAAAAAAAASSSAAALESSLAS4 


; TEST 4 
MoV #4, TSTNO 
MOV aTST5, NEXT 
MSTCLR 

BIT eB1T15, STAT! 
BEQ 

SIT wBiTO, STAT3 
BNE +6 

JMP i0$ 

BIT eB1T12, STAT! 
BNE 

ISR Pc. BASELD 
JSR RS; XFRELD 
177320 

A 5,99 

CLR mp 

TSTB ~—s-_ BCR) 

BMI +20 

INC TEMP 

BNE 1$ 

DEC R3 

BNE 1$ 

HLT 14 

BR 10$ 

BITB #8BIT0,2(R1) 
BNE 11$ 

HLT 14 

BR 10$ 

MOV #8178, RS 
MOV 6(R1).R4 
CMP RS, RY 

BEG +4 

HLT 1S 

JSR PC SHUTDOWN 
MOV #263 

MOV terete3, RI 
MOV 

CMPB taose. (RL) 
BNE 23$ 

DEC R2 

ONE 228 

BR 243 

-BYTE 6,0,0,0,.0,0,0.9 


;R1 dal BASE OMCi11 ADDRESS 
;MASTER CLEAR DMC11 

;1S IT A DMC? 

;BR IF YES 

; KMC Fes SET? 


Sk IP_TEST 
LU PRESENT? 


NO 
LOAD /pic BASE ADDRESS 
: LOAD xmiT BA/ 


‘Be 

DELAY COUNT 

: CLEAR PELBY COUNTER 
iis RDY 0 SET? 

; INC DELAY COUNTER 


sER ROR, ROY 0 NOT SET 

iTS IT CNTL 0? 

EEROR “Ror CNTL 0 
TIAUE 


‘BUT TOENBECTED™ oy RS 
PUT “FOUND” IN 

1S NON-EX-MEM SE? 

;BR IF YES 

: ERROR A ties NOT SET 


; SHUTDOWN 
:POINTER TO EXPECTED nal COUNTS 
; POINTER TO ACTUAL COUNTS 


UN 
: COMP ARE SOFT ERROR COUNTS 
IF ERROR BR 233 

COUNT 
: CONTINUE CHECKING IF Nor DONE 
ALL COUNTS OK, GET OUT 
EXPECTED ERROR COUNTS 


00Sé 


oo00 a0 
——— rp 
aa to 
hy uu 
-— 

oo 


4 


£ 


pone SaRRERE 


Fs 
or 


ONVOOHOOOV OO OOO OOOVOVOOVOOOOOOOOVO0O00000 


SURFREBREB 
SERRE DEBE SROREOR 


tururvruruorururururufuru 
+ b+ 0 b= b= b= Bo be 


e-e- 2 
Ow 


FOS 


30(1045) li-JUL-77 12:32 PAGE 4 PAGE: 0057 
385d 038 ogtéy FREE ENING TESTS 
000 000 
113737 021443 001250 238: MOVB  BASE+3, TEMP2 
tree Selace poles move Beers? Teo 
11323¢ 1451 Bb tSe¢ MOV as at EMPS 
104017 ous HLT 
104400 108: SCOPE :SCOPE THIS TEST 
s RHRERERREERR SERRE RERRRESES TEST S Skee e eke ee kee eee settee eset 
: #RECEIVE NON-EXISTENT MEMORY, TEST 
!#IN FREE RUNNING MODE, LOAD A RECEIVE BA THAT WILL TIME OUT 
oll THAT A NON-EXLSTENT MEMORY ERROR OCCURS 
RERASASAAARARAASAALALALAAAREAAAASAARASDAALAAFARERAAAAAFS RARE FFLSA 
: TESTS 
012737 o0000S o01226 TSTS: Mov #5, TSTNO 
012737 014772 001216 MOV #7ST6, NEXT 
RI CONTAINS BASE DMC11 ADDRESS 
104412 MSTCLR MASTER | CLEAR DMC11 
032737 100000 001366 BIT #BIT1S,STATL :IS IT A DMC? 
001406 BEQ +1 :BR IF YES 
032737 000001 001372 BIT #81T0,STAT3 :KMC WITH BITO SET” 
001002 BNE +6 :BR IF YES 
000137 014770 JMP 10$ :SKIP TEST 
032737 010000 9001366 BIT eB1T12, STAT] :LU PRESENT? 
001372 BNE 12 ‘BR IF NO 
004737 o22040 JSR PC, BASELD OAD DMC BASE ADDR 
004537 922416 JSR RS'RFRELD LOAD reve Ive QA/CC 
177320 177320 :BA 
140044 140044 >CC 
7 922450 JSR RS, XFRELD “LOAD XMIT BA’CC 
021324 TBUF :BR 
000044 44 cc 
012703 900015 MOV 815, R3 :DELAY COUN 
037 901416 CLR TEMP : CLEAR geeay COUNTER 
105761 090002 1$ TSTB ss BRL) ils ROY 0 SET? 
100407 BM! +20 F SET 
005237 o01416 INC TEMP :INC DELAY COUNTER 
001372 BNE 1$ :BR IF NOT DONE DELAY 
303 DEC R3 :DEC DELAY COUNT 
001370 BNE 1$ :BR IF BELAY NOT DONE 
104014 HLT 14 iER ROR oY 0 NOT SET 
000453 BR 10$ GET 
132761 000001 oco900e2 BITS #BITO,2°R1) ‘1S IT eNTL 0? 
001002 BNE 11$ :BR IF YES 
104014 HLT 14 ; ERROR NOT CNTL 0 
000445 aR 10$ NTIAUE 
012705 o00400 118: MOV #81T8,RS BUT “EXPECTED” IN gS 
016104 900006 MOV 6(R1) RY *PUT “FOUND™ IN 
020504 CMP RS RS 1S NON-EX-MEM set 
001401 BE + R IF YES 
104015 HLT is ‘ERROR NON-EX-MEM NOT SET 
004737 oz22502 JSR PC, SHUTDOWN : SHUTDOWN OMC 


GOS 


ODDMH = MACY] 3011046) Ll-JUL-77 12:32 PAGE 43 PAGE: OOS 
DIDMH. PLL 16-MAY-77 09:54 FREE RUNNING TESTS 

gile 014700 912700 014726 MOV #253, RO i POINTER TO EXPECTED SOFT COUNTS 
113 014704 012701 021443 218: MOV wBASE +3, RI ‘POINTER TO ACTUAL COU 

2114 014710 O12702 o00010 MOV Re : COUNT 

2115 O14714 122021 225: CMPB Caos ee (RL D4 ‘COMPARE SOFT ERROR COUNTS 

2116 014716 001007 BNE 23$ LIF ERROR PF 23$ 

2117 014720 302 DEC Re Dec COUN 

2118 Ol4722 001374 BNE 22 CONTINUE CHECKING IF NOT DONE 

2119 014724 O00421 gR o4$ ALL COUNTS OK, GET OUT 

2120 O147 000 000 090 2ss: .BYTE 0,0,0,0,0,0,0,9 EXPECTED ERROR COUNTS 

2121 O14731 000 000 006 

2122 O14734 000 000 

2123 014736 113737 021443 001250 238: MOVB pase +2. TENPe 

2124 O14744 113737 Oel44S 001252 MOVB 

2125 014752 113737 Oel447 901254 MOVE  BASE+7" TEMP4 

2126 O14760 113737 921451 001256 MOVB Base +11, TEMPS 

2127 014766 1040i7 HLT 17 

2128 914770 243: 

2ie8 014770 104400 ics: SCOPE :SCOPE THIS TEST 

2131 

2l3e s RESLFLEAARALALAALAL LSE LEEE TEST G EXRRRERERASRS ELSES SA ES SS ESE 

2133 ; PROCESSOR ERROR TEST 

2134 #IN FREE RUNNING MODE, DO A BASE TRANSFER REQUEST AFTER 6 

2135 :¥BHSE HAS BEEN SET UP’ VERIFY THAT A PROCESSOR ERROR OCCURS. 

cis PUPTTTUTTTOTETITETICCIT ICCC CIOS CTT TTT Leet eee TTT iteTeeetet eee! 

Esl 

2138 ; TEST 6 

2140 O14772 012737 OO000E oD1ze¢ TsTé: ov 86, TSTNO 

gia 015000 012737 015234 O01216 MOV 81ST? , NEXT pat] 
i4 :R1 CONTAINS BASE OMC11 ADDRESS 

2143 O1S006 104412 MSTCLR ;MASTER CLEAR DMC1! 

2144 915010 032737 100000 001366 BIT sBIT15, STAT! :IS IT A DMC? 

2145 015016 OO1406 BEQ :BR IF YES 

2146 015020 032737 o00001 001372 BIT ieit0, STAT3 :KMC WITH BITC SET? 

2147 015026 001002 BNE -BR IF YES 

2148 015030 000137 o1Se32 IMP ios ‘SKIP TEST 

2149 915034 032737 910090 001266 BIT #81712, STAT! :LU PRESENT” 

2150 015042 001372 SNE - :BR IF NO 

2151 015044 004737 o22040 ISR Pc BASELD ‘LOAD BASE ADDRESS 

2152 O150S0 152711 900043 128: BISg) Ss #43, (RI) ; OND BASE REQUEST 

2153 015054 105711 TSTB (R15 :RDI SET? 

2154 O15056 100376 QPL 72 : BR IF NO 

2155 O15060 142711 o00049 BIC #40, (RL) :CLEAR RQI 

2156 9015064 005037 OO01416 CLR TEMP :GET SET TO DELAY 

2157 015070 105761 ood00e 138: TSTB 2: R31.) :RDO SET? 

2158 015074 100405 BMI 14$ :BR IF YES 

2159 915076 37 OO141E INC TEMP :INC DELAY 

2160 015102 001372 BNE 138 :BR IF NOT DONE DELAY 

2161 015104 104014 HiT 14 ; ERROR RDO NCT SET 

212 015108 0770 ? BR + pees TRY AGAIN 

e163 O15i10 132761 0000: oD2002 148: BIT #8ITO,2(R1 :IS IS CNTL 0? 

glee piets6 matt ene iis :BR IE Maid ONT 
ove ' ry ~ Th ~ 

Bizz 512158 daoadd 3 10s : ZONTINUE 

2187 O15:24 012708 of1o0c 118: MO 88179, 85 :PUT “EXPECTED” IN 85 


cates MACY11 30, 1046) 
7 09 


= = b= pb Bs Bo Bo ph Be 
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fru 
Oo 
— 
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= bb be 6 be be be Fb bb 8 ee — 
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:S4 

000006 

015170 

021443 

000010 
coo 000 
000 asia) 
000 

921443 001250 

021445 O0125e2 

021447 001254 

C2145i 001256 

900007 901226 

OiSs7& O0l216 

100600 901366 

000051 001372 

O1S474 

010000 001366 

022040 

OGOO4E 

O0004C 

OOLY1E 

Cosode 

OC14ié 


ocoo0: 


12:32 PAGE 44 
FREE RUNNING TESTS 


HOS 


MOV &(R1),R4 :PUT “FOUND” IN RY 

CMP RS, RY :IS PROC ERROR SET? 

BE +4 c. Y 

HL 1S NC ERROR NOT SET 

MOV #2S$,RO BOINTER TO EXPECTED Mat COUNTS 
MOV #BASE+3,R1 ‘POINTER TO ACTUAL COUNTS 

MOV a if UN 

CMPB (ROS+, (R1)+ MPARE SOFT ERROR COUNTS 

BNE 23$ IF ERROR BR 23 

DEC Re :DEC COUN 

BNE 223 C0 NTINUE CHECKING IF NOT DONE 
as “ALL COUNTS OK, GET OUT 


24$ 
-BYTE 6,0,0,0,0,0,0,0 :EXPECTED PRROR COUNTS 


MOVB BASE +3, TEMP2 
MOVB  BASE+5; TEMP 
MOVB _BASE+7; TEMPY 
MOVB BASE +11. TEMPS 


SCOPE ;SCOPE THIS TEST 


5 LEERARRARALARRRRERARESEEEES TEST 7 SkReRERSeREREE ESSE LASER ESS 


; HPROCESSOR ERROR TEST 
#IN FREE RUNNING MODE DO A ROI WITH AN ILLEGAL 10 CODE 


i VERIFY THAT A PROCESSOR ERROR OCCURS 
REREERERERARERA ESE LEA LEAS ESAAAREA ESE PEALALEL SERS EES EATS ES 


; TEST 7 

Mov #7, TSTNO 

MOV #TST10,NEXT BS 
:R1 CONTAINS BASE OMC11 ADDRESS 

MSTCLR sRASTER CL CLEAR DMCL! 

BIT sBIT1S,STAT! 

BEQ +16 :BR IF YES 

BIT #81T0,STAT3 KMC WITH BITO SET? 

BNE +6 :BR IF YES 

IMP 103 :SKIP TEST 

BIT 81712, STAT! :LU PRESENT? 

QNE -le :BR IF NO cc 

ISR PC BASELD LOAD DMC BASE ADDRESS 

BISB =s-_- #46. (RI) :RQI AND ILLEGAL CODE 

TSTB (Rij ‘WAIT FOR ROI 

PPL -¢ ‘BR IF NO RDI 

BICB ~—s_« #40, (R11) :CLEAR ROI 

CLR TEMP :CLEAR COUNTER 

TSTB ss BRI) : SEI 

BMI +14 :BR IF 

INC TEMP : BUMP COUNTER DELAY 

ONE 1$ :8R IF NOT OONE 

HLT 14 ERROR NO ROY 5 

OR 1$ : TRY AGAIN 

BITE s#BIT0,2(R1) -IS IT CNTL O 
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DZDMH.P11  16-MAY-77 09:54 FREE RUNNING TESTS 

2224 015360 001002 BNE 11S ;BR IF YES 

2225 015362 104014 HLT 14 ; ERROR NOT CNTL © 

S558 Biezee B00 ste oo1oc0 tis: Bev WB Rra. rs ‘BUT PECTED" IN RS 

2228 015372 016104 000006 MOV &(Ri),R4 ‘PUT “FOUND” IN RY 

2229 015376 O20S04 CMP RS,R4 21S PROC ERROR SET? 

gg30 Oi 400 140 BE +4 ‘BR IF Y 

1 015402 i040! HL is ‘ERROR PROC ERROR NOT SET 

2232 O1S404 012700 015432 MOV #25$, RO ; POINTER TO EXPECTED SOFT COUNTS 

2233 O15410 012701 021443 21$: MOV #8ASE+3,R1 POINTER TO ACTUAL COUNTS 

s53¢ ee eer — 22$ CMP Ope COUNT SOFT ERROR COUNTS 

ss3p Bledso Ageoed \ nr ae : FOMEARE SQFT 68 

2237 015424 005302 DEC R2 DEC COUNT 

2238 015426 001374 BNE 225 CONTINUE CHECKING IF NOT DONE 

2239 015430 O004e) BR ous ‘ALL COUNTS OK, GET OUT 

2240 015432 000 000 900 253: “BYTE 6,0,0,0,0,0,0,0 EXPECTED ERROR COUNTS 


2241 015435 000 000 000 


so45 pt uue ll oe 14a 901250 235 MOV ASE+3, TEMP 
: + 

oo4y teucs 113737 peta 901252 MOV BR aE tz: tEM 65 
2e4S O1S4S6 113737 O2l44? 001254 MOVB BRees?” TEMP4 
2246 O15464 113737 O214S1 001256 MOVE BASE+11, TEMPS 
2247 S1547e 104017 HLT 17 
eo4e 015474 24S: 
2249 O15474 104400 108: SCOPE :SCOPE THIS TEST 
22eSe s RLRERARERERERERRREREREREELE TEST 10 Feeeetesedeeaeeeetseeeseese 
2252 ; #HALF DUPLEX TEST 
2254 #IN FR EE RUNNING MODE, SET HALF DUPLEX AND L U LOOP 
2255 ;#SENO 9 MESSAGE AND VERIFY THAT THERE ARE NO DONES 
5525 + RRRRERLEAERESASSE REED LERERAE SARE SSERASAS EAE SEAS RS SESE TASES ESE 
2258 ; TEST 10 
oo. S476 737 0 is OV. BIO. TST 

154 1 122 TST1C: V #10. TSTN 
ssp? pteeqg Bt5535 Meee neat HOV rotten xT 
e2be Rd CONTAINS BASE MC 1 ADDRESS 
2262 O15512 104412 MSTCLR MAST ERC LEAR DMC 
2264 O15el4 032737 100000 001366 BIT sBIT1S,STATL IS IT A OMC? 
2265 015522 001406 BEG +16 :BR IF YES 
2ebe 0155e4 032737 OCO0U! 001372 BIT eBIT0,STAT3 sKMC WITH BITC SET? 
55e2 bt 2234 ppd 95 015624 aN ig BRA TEES 
2269 015540 032737 O10000 00:36 BIT i712, STAT :LU PRESENT? 
2270 015546 001372 BNE -12 :BR IF NO 
2271 015550 004737 o22156 ISR Pc, BASELH ‘LOAD BASE AND HALF DUPLEX 
2e7e O15554 004537 Ooodie JSR RS’ RFRELD ‘LOAD RECEIVE BUFFER 
2273 015560 021372 RBUF :BA 
2274 015562 O00044 44 CC 
2275 015564 004537 o2e4s0 JSR RS, XFRELD :LOAD TRANSMIT SUFFER 
2276 015570 021324 TBUF :BA 
2277 015576 pogcws 44 
ce7e 015574 012702 oo0003 MOY 82,83 (Sap DELAY Count 
2275 «O15€00 006037 S0:4ie CLR TEMP “CLEAR DELA 


JOS 
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DZDMH. P11 16-MAY-77 09:54 FREE RUNNING TESTS 
ooo002 4$: 8 R1) 
sce? Bleeyd {86466 gal? 6 16K IPMS (Enron) 
2282 Oisble 0052 3 001416 INC TEMP tay to hai 
5584 1808 tlie RECS 2 F_PELAY iat 
2285 01562 001370 * oe 4§ R IF DELAY ONO DONE 
sses Bi agg Ags: argPe iy 4 pone WYPH HALF-DUPLEX 
eese 015630 000775 aR 10$ 
se 
ssi PS a aamppmemitaay TEST 1] eeeeeeeeERRSE SE EER SESE EEE ES 
2293 :*THIS TEST SENDS AND RECEIVES A BUFFER AND SHUTS DOWN THE 
2294 !#DMC. THEN A MASTER CLEAR IS ISSUED AND A BASE WITH RESUME 
2295 !#BIT SET IS GIVEN, ANOTHER BUFFER IS SENT AND RECEIVED. 
22% sonra IS CHECKED. 
ssa s SELAERAERARASSASAELESERAARAASLAAAAA LAA FAA LAPLALAARA LEA LALAFLALS 
2033 ; TEST 11 
2301 015632 012737 OO00011 901226 TST11: MOV #11, TSTNO 
e302 015640 012737 016214 001216 MOV eTSt12,NEXT js 
$B oissye 100 weycu ae SUGAR PCH ORES 
S3p¢ 18es0 739 100000 001366 BIT sBITIS,STATI iJ a OMC? 
5308 pt aePR 8933 900001 001372 bal watfo, STAT3 KMC WITH BITO SET? 
ae hes MU me ol of 
te ° 
5393 pt ea 598437 pi esis 001366 BIT ihre, STAT LU PRESENT? 
Sib Blea BEE ozone se Pelee e423 
$ ir 
2313 015710 005737 O20060 1$ TST ac sine “FIRST SHENG Pass” 
2314 015714 O01 BNE 2$ :BR IF SECOND 
2315 015716 004737 oO22040 ISR PC, BASELD : BASE 
2316 015722 O004 BR 33° : CONTINUE 
2317 015724 004737 922276 2$ ISR PC RESUM :BASE WITH RESUME BIT 
2218 0157 7 O2e416 38: J5R RS’ RFRELD :RECEIVE BUFFER 
2319 615734 021372 REUF :BA 
320 157 p04 4Y CC 
1 01574 37 o224S0 ISR RS, XFRELD :XMIT BUFFER 
2322 015744 021324 TBUF :BA 
2323 015746 oo0044 44 CC 
3e4 O15 16703 000030 MOV #30,R2 : DELAY COUNT 
3eS 015754 012700 000002 MOV #2,R0 ?NEED TWO DONES 
2326 015760 005037 OO141E CLR TEMP :CLEAR DELAY COUNTER 
2327 015764 105761 o0000e 4$: TSTB ss BCR.) :13 ROY 0 SET? 
2308 O15 100407 BMI 420 IF SET 
23e9 015772 005237 O01416 INC TEMP :INC DELAY COUNTER 
2330 015776 001372 BNE 43 ‘BR IF NgT DONE DELAY 
2231 016000 005303 DEC R3 :DEC DELAY COUNT 
e33e 016002 001370 SNE 4 :BR IF DELAY NCT DONE 
2323 016004 104014 HLT 14 :ERROR, ROY O NOT SET 
2224 O16006 d0050) ae 10$ GET OUT 
2235 O16010 042761 oc0207 oDCDDe BIC #207,2\R1) :CLEAR DONE 


OZDMH MACYIL 30(1046) L1-JUL-77? 12:32 PAGE 47 PAGE: 
DZDMH.P11 16-MAY-77 09:54 FREE RUNNING TESTS 
: YET? 
S336 BPAAR BRTaPP Bhe RR i SHO, PONE 
2338 016022 012702 021324 MOV #TBUF , Re “ADDRESS OF GOOD DAT 
2339 016026 012703 021372 MOV #RBUF | R3 “ADDRESS OF RECEIVED PORTA 
2340 016032 Ole7 oo0044 MOV #44. RO : 
2341 016036 112205 6S: MOVB (R2}+,RS DATA 
2342 O16040 112304 MOVB = (R3) +, R4 :LOAD FOUND DATA 
2343 O16042 120504 CMPB : ;COMPARE DATA 
2344 016044 001401 BE 
2345 O1604% 104012 HLT 12 :DATA ERROR 
e346 016050 905300 7$: DEC RO : . ver 
534g iesed So434> oeesoe BME «BE cHutpown e pia OWN DMC 
2349 016060 005737 020060 TST RESUME 
2350 016064 00 BNE 8$ ‘BR IF ALL DONE 
2351 016066 012737 177777 O20060 MOV 8-1, RESUME :SET FLAG FOR SECOND PASS 
2352 016074 BR 1$ : CONTINUE 
say OIeare y sh R a INTER TO EXPECTED SOFT COUNTS (LOW SPEED 
& v LO VW} 
S3ec nats heed at 00137 BIT sere erar3 iit on 5a at 
+, TATE B1e7b6 615 a ote R ED SOFT COUNTS (HIGH SPEED 
8 ( 5 D) 
532, 1 ite 12701 Pda 218: MOV sanee ss ai a it i aaa RoR Ree 
2359 Ol6122 Ol2e702 000010 MOV #10, Re 
2360 016126 202! 225: CMPB ss (ROS+, (R1)+ COMPARE SOFT ERROR COUNTS 
2361 0161 1913 BNE 23$ IF ERROR BR 23S 
o3p5 ote ad ae oft 8S :DEC COUNT CKING IF NOT DONE 
53e3 pte 3e Bpddoe BR 4 ‘ALL COUNT 185K T OUT 
2365 016140 000 000 000 253: ‘BYTE 0,0,0,0,0,0,1,1 ;EXPECTED ERROR COUNTS (LOW SPEED) 
2366 016143 000 000 000 
2367 O16146 001 001 * 
2368 016150 000 900 26S: -BYTE 0,0,0,0,0,0,0,0 ;EXPECTED ERROR COUNTS (HIGH SPEED 
2369 016153 000 000 000 
2370 016156 000 000 
Se Mee lite ine Me te Bee TES 
237 Stet aa tt3o35 98 tia? 1254 Move BPE tS: TE 
2274 016202 113737 natey 001256 MOVE BRee sii. anes 
2375 016210 104017 see HLT 17 
a 51esis 104400 108: SCOPE ;SCOPE THIS TEST 
2379 
2380 OE TG RTE Lait ee oe STO pacar 
#FR I (INT. VEN EXER 
THs feet REPERTEDLY Que STRECEYUE BUFFERS ANC 
2383 :#7 nae REEVE OATA men ALL | ; a 
8 AGL a es 
2385 :40 AISA SO WaRY Cc aT PATTERN RES Pion 
2386 #IS CHECKED IN THIS TEST. THIS TEST USES al PORNGROUND CONNECT 
2287 i#1F IT IS PRESENT, OTHERWISE LINE UNIT LOOP IS SET 
Ssce i#1F IT TS PRESENT, OTHERWISE LINE UNIT LOOP 1S SET. 
e290 ‘; TEST le 
eesti t~—‘— nena ear cen 


LOS 
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D2DMH.P11  16-MAY-77 09:54 FREE RUNNING TESTS 

2392 016214 012737 000012 001226 TST12: MOV #12, TSTNO 

2393 016222 012737 003364 001216 MOV #8. EOP, NEXT : 7 ote 

S342 oig230 104412 MSTCLR RAS SPR Or BRB RE sD , 

23% Ol6232 032737 100000 001366 T wBITIS,STAT! ;IS IT A DMC? 


BI 
7 Ql 4 + 6 ;BR IF YES 
00000 T ; T T T? 
$8 Hess Berane OmOL v2 Pe ffossrara ie proto 


SNOT GIESEE Guers? BLOWOO 001366 ee stat: iu peeGenr? 
Sie flees Gee gum ze Ria, tara treme 
7 a : 

ipgr4 B15700 1366 MOV ATL, RO ite eR L 
Sin Bie Bis? ny TSP ated cones 
2406 016302 006<00 ASR RO 
2407 016304 006200 ASR RO 
03 ot 1 700 4774 ? BIC #177437, RO :PUT BR LEVEL IN RO 
SPST EDS UE sm Bee: UR Mi ver 

Vv ; LOAD 

4 7 74 163044 ng aot8 VEC it 3eD Out UT VECTOR 
sii8 Bipsss Bt8G55 Pb Sd5s MOV RO, JOATLVL iL at LEVEL 
Site : INITIALIZE ALL BUFFER LISTS AND COUNT LISTS 
417 016340 012737 O00104 O21316 MOV #104, TFLAG ;TFLAG CONTAINS COUNT 
2418 016346 012700 o20064 MOV exMITBA+2,RO  ;RO POINTS TO BA LIST 
Eat O1b35¢ 012703 020356 MOV #RBUFF RS *R3 CONTAINS BUFFER ADDRESS 
oe 16356 O01 1$: MOV R3, (ROS+ ‘LOAD BA LIST WITH REC BA 
set jibes terres Sigs Se eiNStvzo,n0 | /BO"ae fee BOEPERSY 
e423 ot ae BNE 1$ ; ?NO LOAD RE 
e424 016372 012720 020120 25: MOV #TBUFF,(RO)+  ;LOAD BA LIST WITH XMIT BA 
2425 016376 022700 de20le0 CMP SXMITBA+36,RO ;ENO OF XMIT BUFFERS? 
2426 O16402 001373 BNE 2$ :NO LOAD NEXT BUFFER 
2427 O16404 012700 020232 MOV SRCNTAB+2,RO  ;RO POINTS TO COUNT LIST 
e428 O16410 013720 021316 3$: MOV TFLAG, (RO}+ :LOAD COUNT OF 104 

Oibais 2 020250 CMP SRCNTAB+20,RO  ;END OF REC COUNT LIST? 

16420 0013 BNE ‘BR IF NO 
suas fiewan fisri] poe os oy RR LAS gL OOP COUNT MASTER CLEAR 

ped piss iy 001366 BIT eBtTa A) Rid 
2434 O16442 001402 BEQ + :BR IF NO 
2435 O16444 012711 100000 MOV #BIT1S, (R1) :SET RUN ON IOP 
2436 O16450 012700 177777 MOV 8-1,R0 ?RO IS INPUT DONE COUNTER 
2437 O16454 005037 O20060 CLRTAB: CLR RE ‘CLEAR RESUME FLAG 
2438 O16460 012705 Oe0ebt MOV 8RONTAB, RS : GET READY TO CLEAR ALL RECEIVE 
2439 016464 005025 2$: CLR (RS)+ : BUFFERS 
e440 016466 022705 021312 CMP #RBUFFE, RS :END OF BUFFER? 
2441 016472 001374 BNE 2s : NO 
2442 016474 012704 oO20es0 MOV aXCNTAB, RY :R4 POINTS TO XMIT COUNT LIST 
e443 O16500 013724 021316 4$: MOV TFLAG, (R4)+ :LOAD XMIT CHAR COUNT 
2444 016504 022704 O202b6 CMP #XCNTAB+16,R4  ;DONE? 
2445 016510 001373 BNE 4$ :BR IF NO 
ev4e O16 le 002 S$: CLR Re ;R2 IS OUTPUT DONE COUNTER 
447 O16514 O05004 CLR RY -R4 IS USED AS INDEX IN OISR 


DZ0NH MACY11 30( 1046) 
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odd§ BYBEAB BOS} 
B4SO Olese2 152761 


016604 


aa 
oma 


aaa 


012701 


000109 
040000 


004000 
o0000S 
000143 
000144 
001416 
000022 
177776 
000020 
017102 
000034 
017102 
000034 
017102 
020266 


001252 


900002 
02032e 
000001 
000001 
021316 


000040 
021314 


000146 
021314 


017024 
000002 


017034 
021443 
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BBL 


BISB 


12:32 PAGE 49 
FREE RUNNING TESTS 
000002 
001366 
021314 
1$: 
3$: 
001250 
SCAN 
SCAN2 
8S: 
9$: 
S$: 
6$: 
021314 4§: 
021316 1$: 
es: 
ENDEX: 
1$: 
001372 
2$: 


MOS 


(ah) 
#BIT6,2(R1) 
0gT14, »STATI 


#BIT11 (R1) 
8S, FLAG 


#143, (R1) 


9$ 
SCANI 


he RO 
(R 0)+,Re 


R 
(RO) ,R3 

6$ 

#2, RO 
#RONTAB+34 , RO 
S$ 

#1. RO 

#6170, FLAG 
TFLAG 


oto TFLAG 
FLAG 


CLRTAB 
8146, (RL) 
FLAG 


#10$,RO 
#BIT1,STAT3 
#11$,RO 
#BASE+3,R1 


eee 


PAGE: 


AB FoR Run 


iB ocx CONNECTOR? 
SET LINE UNIT LOOP 
T TIME? 


T 
SET IEI,RQI,BASE I 


Ser i. purine ROI, REC BAC 
UP FOR R DELA 


teat SET FLAY 

;ALLOM INTERRUPTS 

; INPUT DONE? 

BR F YES 

EXMIT ~ FOR ALL MESSAGES? 


'BR IF NO 
PREC DONE FOR ALL MESSAGES? 
tBR IF YES 

'BR IF NO 

.GET FIRST REC BUFFER 


:Re POINTS TO BUFFER 
; RS=EXPECT XPEC ip 


;BR NO 
GET NEXT »REC BUFFER 
DONE YET? 
:BR_IF_NO 
SET RO TO 
;CHANGE CHAR COUNT FOR NEXT LOOP 
BR TO SUB 40 
DEC_BY ONE 
: CONT INUE 
;SUBTRACT 40 a XMIT COUNT 
;DEC_ LOOP COUN 
560 Wy IT AGAIN 

OMC 
i INTERRUPT OCCURED? 


OINTS TO LO SPEED COUNTS 
it itt LO SPEED? 


;RO POIN : TQ HI COUNTS 
POINTER TO ACTUAL COUNTS 


~~ 


cr 


0064 


11-JUL-77 
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eS04 017006 012702 000010 
2S0S ett ate 
See 
eS08 017020 001374 
e509 017022 000410 
10 Ql poe 
td 17027 0 
1 1 00S 
2513 017034 000 000 
said fiat 000 etal 
SIE ERS soli 
2517 017046 113737 021443 
2518 017054 113737 del44s 
2519 017062 113737 021447 
eSe0 017070 113737 021451 
2Sel ths tnt 
55 IS BES cons 
2Se4 017106 001402 
25eS 017110 000137 016604 
eSe6 017114 005337 001250 
eSe7 017120 001402 
eSe8 O17lee 000137 016604 
eSe9 O171e6 104001 
2530 017130 000745 
2S31 
2$32 
S34 171 2700 000017 
2535 B73 Boi 4e1 
2536 017140 005737 020060 
2537 Mee 001432 
e538 01714 032711 o0c002 
2539 017152 001407 
sit Guts Bett Sine 
ee 
Sele 017176 3 006 
4S 017 142711 000040 
a] Oi 7608 108776 
5 BB BS ccoms 
e549 017216 001403 
2550 Bi S5e 152711 000041 
Sk BIS ie 
oe nies 
58 Bie 
con aicae pasret 021440 
a ee 
eSS3 0172Se 001003 


00006 


ooo004 


12:32 PAGE SO 


NOS 


FREE RUNNING TESTS 


3$: 


10S: 


11S: 


ENDEX1: 
ENDEXe: 


SCANI: 


1$: 


2s: 


IISR: 


13$: 
12$: 


7$: 


PAGE: 


;10 COUNTS TO CHECK 
;CHECK COUNT 
; IF ERROR 
OUNT 
;BR IF NOT at, 


SALL_OK GET OUT 
EXPECTED LO SPEED COUNTS 
;EXPECTED HI SPEED COUNiS 


;SCOPE THIS TEST 
: SAV = ALL ODD ADDRESSES 
jFOR T YPEOUT 


;NON ZERO ERROR COUNT 
ete DELAY COUNTER 
;BR_IF NOT DONE DELAY 
DEC DELAY COUNT 

:BR IF DONE DELAY 

:BR IF NOT DONE 

RROR HUNG 


ERROR 
:GET OUT 


;PROC. ERROR DONE? 
‘RT THIS A RESUME INTERRUPT 


— 0 


ure ATNUS 
SE AOORESS 
‘et babe CBU 


MOV #10,R2 
CMPB =s (ROS+. (R1)+ 
BLO ENDEXe 
¢ 2 
BNE 3$ 
BR ENDEX1 
.BYTE 0,0,0,0,0,0,5,5 ; 
.BYTE 0,0,5,0,0,0,5,5 
SCOPE 
MOVB BASE+3, TENP 
MO''B SE +8, TEMP 
MOVB Brees TEnpa 
MOVB Base +11, TEMPS 
HLT 17 
BR F Xl 
C E 
BEQ 1$ 
IMP SCAN 
DEC TEMP2 
BEG 2$ 
IMP SCAN 
HLT i 
BR ENDEX1 
; INPUT INTERRUPT SERVICE ROUTINE 
CMP #17, RO 
BEQ 12$ 
TST RESUME 
BEQ 8$ 
BIT eG1T1, (RL) 
nov wR) 
HOV oF fs 12, yea 
CLR a) 
¢LR SUME 
BICB #40. (RI) 
TSTB. ss (RLS 
eat RESUME 
BEQ 14S 
BISB #41, (RI) 
RTL 
cL (RL) 
TST 
L ? 
MOV #BASE,4(R1) 
gLR (Rl) 
BNE 1$ 


:CNTL I FULL DUPLEX IF 0 


O0€S 


DZDMH  MACYL1 a Ee. 

DZOMH.P11 16-NAY- 
2S60 017254 005061 
e561 017260 000430 
eSbe O017ebe 032700 
2S63 He 001013 
2564 Bt 000241 
2S6S 017272 006100 
2566 017274 016061 
eS67 017302 016061 
2eS68 017310 00024) 
2S69 017312 006000 
2$70 017314 O0041e 
2571 017316 00024) 
eS7e 017320 006100 
e$73 O173ee 016061 
2e$74 017330 016061 
2e$75 017336 000241 
2eS76 017340 006000 
2$77 O1734e 142711 
2eS78 O17346 105711 
2$79 017350 100776 
2eS80 0173S2 005200 
2581 017354 001003 
e$82 017356 15271 
eS83 017362 000002 
es84 017364 022700 
es8S 017370 00141 
2586 017372 032700 
2587 017376 001003 
e588 017400 15271 
ess 017404 
2590 017406 152711 
2$91 Q174le 
2532 917414 152711 
es33 017420 
eso 
2595 
2S% 
2597 017422 032761 
eS98 017430 001467 
2599 01743e 005737 
e600 017436 1006 
2601 017440 37 
2602 O17444 022761 
2603 0174S2 001531 
2604 017454 022700 
2609S 017460 001041 
2606 017462 022761 
e607 017470 001035 
2608 017472 
2609 017474 Q12711 
2610 017500 737 
e611 017506 001405 
ele 017510 012711 
2613 017514 10S2ee7 
e614 017520 001375 
2bis O17S2e 012737 


ail le: = PAGE 51 


FREE RUNNING TESTS 


000010 1$: 


000004 
000006 


020062 
020230 

es: 
020062 00004 
026230 o00006 


000040 3$: 


000041 
000017 6$: 
000010 
900044 
000046 S$: 
00046 4$: 


000001 
021314 


021314 
001000 900006 


000017 9S: 
001000 900006 


oosode 


040000 
100000 001366 
100000 
000000 


177777 Oe00&d 


OISR: 


CLR 


B06 


&(R1) 

3$ 
#81T3,RO 
es 


RO 
RECBA( 4(R 


REN FAB CROS “be ALD 


#41, (R1) 
#17,R0 
4§ 
#81T3,R0 
#44, (R1) 
#40, (R1) 
#46, (P1) 


1) 


PAGE: 


saeLeeT FULL DUPLEX 


COUN 
IF 0 a CNTL I 
ASK FOR CNTL I 
; RETURN 
DONE YET? 
:BR if YES 


MIT 
;BR IF YES 
ASK FOR REC BA/CC 


. N 

ASK FOR XMIT BA/CC 
> RETURN 

sFORCE PROC. ERROR 
; RETURN 


INTERRUPT SERVICE ROUTINE 


#BIT0,2(R1) 
1$ 
FLAG 
9$ 
FLAG 
sBIT9,6(R1) 
10$ 
#17,R0 
#BIT9,6(R1) 
11$ 
RG 
eBIT14, (RL) 
1} ee STAT1 
witis, (RL) 
« 


al, RESUME 


ils THIS AN ERROR? 
1S THIS SHUT DOWN INTERRUPT? 
its MAKE FLAG NON-ZERO 


I 
RESUME INTERRUPT? 
;PROC ERROR BIT SET? 
ee COUNTER (TO 20) 
;MASTER CLEAR DEVISE 
: C OR KMC? 


omc 
;SET RUN ON KMC 
:DELAY ON KMC 


;SET RESUME FLAG 


OO&E 


OOo 


PRERRRRRRRRRRROOOD 3 


2634 


vw 
OVONNOOOOOOOOO0O0000 = 


— = b&b be be 0 be be Be he he be he pe 


ERD TeRBNe 


z 
8 
3 


oe 
oo 


OOOO VOVOOOVOOOVWOOVOVOOVOVOOVVOV00O00000 
ee he be be be be 0 ee 


IIRRARET SPIO TSR OTE 


ee 


fo 
oO 
oO 
£ 
£ 


SRESeRBee ES 


RE 
oe 


Bole 
ee 
gees 
—= 
~ 
o 


SRSR8 
ras 


oO 
— 
ae 


O& 
000002 


020322 
020322 
o0000e 


000004 


000006 


Oe02b6 
020266 


L1-JUL-77 12:32_ PAGE S2 
09:S4 


FREE RUNNING TESTS 


1$: 


4§: 
S$: 


6$: 


10$: 


8$: 


TST 


COB 


(R1) 


.-2 
#8IT6, 2(R1) 
#BIT14, STATI 


8 
Fy 
y 
i 
ire (SP)+ 


a etn 
eTBUFF ,4Y(R1) 


4 
ate »4CR1) 


sTBUFF 
HRD), TERPS 


RS 
XCNTAB(RS) ,6(R1) 
6$ 


#2,RS5 
#16, RS 


?; 
4¢RL , XONTAB(R2) 
(RL) , XONTAB(R2) 


| 
#207, 2(R1) 


{R1) 
2(R1) 


#2,RS 
RECEACRS),4CRL) CO 


RS 
XCNTAB(RS) ,6(R1); 
8$ 


#2,RS5 
a6, RS 


cS 
4(R1), RONTAB(R4)’ 


PAGE: 


;RUN SET? 
BR IF_NO 


EO 
:L00P. re CONNECTOR? 


st x : (BASE REQUEST ) 


iSEVE FOR ERROR TYPEOUT 
WO ERROR TYPEOUT 


3 UST STACK 

GET OUT 

Te INIT BA CORRECT? 
oR IF 


:1S ag BA CORRECT” 
iBR IF_Y 


R IF Ok? 


INDEX 
CHECK A CORRECT REC COUNT 
SENCREMENT RS 
; END OF LIST? 
;BR IF NOT 
;REC_COUNT ERROR 
; STORE ae BR 


#2,R4" 31 
B(RL), RDNTAB(RY): : STORE NRE DONE ¢ 


0067 


DO6 


DZDMH  MACYI1 30(1046) 11-JUL-77 12:32 PAGE 53 PAGE: O08 
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2672 O20050 142761 000207 00002 BICB #207, 2(R1) ;CLEAR RDO 

2673 020056 00000e RTI : RETURN 

5675 

é 

2676 ; BUFFERS 

2677 

Seay oon ue 

2680 920062 0000i7 XMITBA: .BLKW 17 ;REC 8 XMIT BA LIST 

2682 020120 TBUFF : ; TRANSMIT DATA 

2683 020120 000 O01 O02 .BYTE 0,1,2,3,4,5,6,7 

2684 O20123 003 O04 005 

2685 020126 006 007 

2686 0280130 O10 O11 ole /BYTE 10,11, 12,13, 14,15, 16,17 

e6e7 000133 486=013.s4 =~ 

2688 O2013% O16 O17 

2689 020140 020 21 O22 /BYTE —20,21,22,23,24, 25, 26,27 

2690 020143 d23 O24 O25 

2691 0201" 02 027 2 

2692 O20150 030 O31 932 /BYTE 30,31, 32,33, 34, 35, 36, 37 

2693 020153 033 O34 035 

26 000:56 03% 037 

2695 Oeciso O40 O41 ove /BYTE = 40,41,42,43, 44,45, 46,47 

26% Ootil6s O43 O44 O45 

2697 OeC'166 047 : 

2698 020170 050 051 ose .BYTE 50,51,52,53,54,55,56,57 

2699 020173 053 054 O55 

2700 020176 055 057 

2701 020200 060 1 062 .BYTE 60,61,62,63,64,65,66,67 


06 
2702 020.203 063 O64 06S 


2704 Oe0e'0 070 071 972 BYTE 70,71,72,73,74,75,76,077 
2705 psosit 073 074 075 


2706 Oe0els 076 077 

2707 Oe0e2) 100 101 192 -BYTE 100,101,102, 103,104, 105, 106, i07 

2708 de0e2: 103 104 105 

hy 020226 106 107 

2711 020230 000010 RCNTAB: .BLKW 10 ;RECEIVE COUNT TABLE 
svi Oe20esC 900007 XCNTAB: .BLKW 7 ; TRANSMIT COUNT TABLE 
2714 O20266 000016 RONTAB: .BLKW 16 ;RECEIVE DONE TABLE (BACCO: 
ste Oe03ee O0001E XONTAB: .BLKW 16 :XMIT DONE TABLE ‘(88/CC) 
2717 020356 RBUFF : ;RECEIVER BUFFERS 

2718 Oe03S6 000104 RBUFF1: .BLKB 104 

e719 OeO04be 000104 RBUFFe: .BLKB 104 

2720 Oe0566 000104 RBUFF3: .BLKB 104 

e721 Oe0672 000104 RBUFFY: .BLKB 104 

e7ee 020 000104 RBUFFS: .BLKB 104 

e7e2 Q2110e 000104 RBUFF6: .BLKB 1C4 

e7e4 Cele0& 000104 RBUFF7: _.BLKB 104 lien G 
sr Cei3ie 000000 RBUFFE: 0 ;ENC OF RECEIVER BUFFERS 


OZDMH 


OZOMH. P11 


O221Sé 


MACY11 30( 1046) 
1$-MAY-77 


012711 
032737 


000207 


11-JUL-77 


09:S4 


040000 
100000 


100000 
000000 


4) 
poodss 
Ce1440 
000006 
000049 
000041 


O0000& 
000649 


001366 


000004 


12:32 PAGE SY 
FREE RUNNING TESTS 





EQ6 


;BUFFER AREA 


¢ 4 
TBUF:  .ASCII/ABCDEFGHIJKLMNOPOQRSTUVWXYZ0 1234567897 


.£ 
RCOUNT: 44 
RBUF: .=.+46 
EVEN 
BASE:  .=.+256. 
; SUBROUTINES 
BASELD: wee. 
: THIS SUBROUTINE LOADS THE DMC WITH A BASE ADDRESS 
:AND PUTS DMC INTO FULL-DUPLEX MODE 
MOV #BITLY, (R1) :MASTER CLEAR 
BIT #BITIS,STAT : CRAM? 
BEQ +6 ;8R IF NO 
MOV sBIT15,(R1) ;1F CRAM SET RUN 
INCB ss 80 : DELAY 
BNE “4 :BR IF NOT DONE DELAY 
1$: ist (R1) iIs RUN nae”? 
#BIT11, (RL) L 
Ete, He, days os aa 
Oe es 
MOV es, 4(R1) oe IF is ADDRESS 
CLR 6(R Oe 
BICB #40, (RL) : CLEAR a 
3$: TSTB R1} “ROY I CLEAR? 
BMI ss ;BR IF NO 
BISB) ss #41, (RL) :ASK FOR CNTL I 
64S: TSTB (R1) ‘WAIT FOR ROI 
BPL 64$ :BR IF NOT SETY 
CLR 6(R1) SET FULL DEPLEX 
BICB  ~—s_- #40, (R11) CLEAR Ra! 
S$: TSTB (RI } :ROI U 
OMI 6S$ ;BR IF YES 
RTS pe RETURN 
BASELH 


PAGE: 


00693 


OZOMH 


OZOMH. P11 


8 


(BOD OB Oded 6 EEBOD ob 


0-2 bb bo be be be he 
WONOUW © Wire oO 


3 


MACYLI 30( 1046) 
18-MAY-77 


19S711 


RESUM: 


ll-JUL-77? 12:32 PAGE SS 
093:S4 SUBROUTINES 
03400 
3500 
040000 ne baete 
100000 001366 03800 
03900 
100000 04000 
0000 4100 
04200 
04300 618: 
04400 
004000 04500 
000043 04600 
04700 =8=2$: 
04800 
021440 000004 04900 
oococE 0S000 
00084 05100 
OSe00 «38: 
05300 
000041 
64S: 
O00e000 o00006 
000040 
6S$: 
oss00 
05600 
05700 
05800 
05900 
€000 
040000 06100 
100000 001366 06200 
06300 
100000 06400 
200000 06500 
O66CO 
06700 i$: 
06800 
004000 06300 
000043 07000 
07100 2: 
07200 
021440 900004 907300 
019000 O00006 97400 
000040 07500 
07600 £3§: 
07700 
occc4 | 
64S: 
oosooe 
000940 
ess: 


FO6 


PRGE: 


; THIS SUBROUTINE LOADS THE DMC WITH A BASE ADDRESS 
AND PUTS DMC INTO HALF-DUPLEX MODE 


MOV #BIT14, (R1) 
BIT #8IT1S, STATI 
BEQ +6 

MOV #BIT15,(R1) 
INCB ss 80 

BNE “4 

TST (R1) 

BPL 1$ 

BIS a (RL) 
8158 (RL) 
TSTB 

BPL ign 

MOV sBASE, 4(R1) 
CLR 6(R1) 

BICB  —s_ #40, (RL) 
TSTB. ss (RL 

BMI § 

BISB —- #41, (RL) 
TSTB (RL) 

BPL 64S 

MOV wot 6(RL) 
BICB (RI) 
TSTB 

BMI Hy 

RTS PC 


iPRan CLEAR 


if Cre SET RUN 
‘BR ial NOT DONE DELAY 
;1S RUN SET? 


'SET LU LUOP 
‘BASE REQUEST 

iROY J SET? 

oad ase ADDRESS 


: CLEAR ROI 
:R0Y 1 CLEAR? 


TASK FOR CNTL I 


; THIS SUBROUTINE LOADS THE DMC WITH A BASE ADDRESS 
WITH RESUME BIT SET AND PUTS DMC INTO FULL-DUPLEX MODE 


MOV #81714, (R1) 
BIT #BITIS, STATI 
BEQ 

MOV wBIT1S. (R1) 
INCB a0 

BNE 

TST (RI) 

BPL 1$ 

BIS #171! (RL) 
8158 —ss«#43, (RI) 

TSTB (R13 

BPL 

MOV #BASE,4(R1) 
MOV #61712, 6(R1) 
BIcB Ss #40, (RI) 
TSTB (R13 

BMI ee 

BISB —s_-&4 1, (R11) 
TSTB CRI} 

BPL b4$ 

CLR 6(R]) 

BICB #40, (RL 

TSTE (RI! 


;MASTER CLEAR 
;CRAM? 


:BR IF NO 
:IF i SET RUN 


LAY 
:BR IF NOT DONE DELAY 
;1S RUN SET? 
;BR_IF N 
;SET LU LOOP 
: BASE REQUEST 
;ROY I SET? 
;BR IF NO 
;LOAD BASE ADDRESS 
;SET RESUME BIT 
:C ROI 
ROY I CLEAR? 
BR IF NO 
ASK FOR CNTL I 


8 Y 
:SET FULL DUPLEX 
;CLEAR RQI 


' 
° ~ 


0079 


DZOMH 
DCOMH. P 


oie 30(1046) ll-JUL-77 12:32 PAGE S& 
16-MAY-77 09:54 SUBROUTINES 
e4le 100776 A 
022414 000207 07900 
08000 
022416 08100 # RFRELD: 
08200 
08300 
022416 152711 O00044 08400 
O2e422 10$711 ossoo§= és i1$: 
O2e4e4 10037 0ss00 
022426 012561 000004 08700 
O2e43e 012561 O00006 08800 
24 142711 000040 08900 
O2e44e 105711 09 2s: 
022’ 100776 09100 
o002ecs 09209 
9300 
022450 09400 # XFRELD: 
09500 
09600 
1$e711 d0C040 09700 
022e4S4 105711 ogso0Q.)—C ss «18: 
O224S6 100376 099300 
e480 012561 od00004 10000 
022464 012561 O00CO0E 10100 
022470 142711 9g00040 10290 
2474 105711 10300 2$: 
C2e476 100776 10400 
0225 009205 10500 
10600 
10700 
022502 10800 SHUTDOWN: 
10900 
1000 
Oe2eS02 O4e76:i 000207 900002 11100 
022510 152711 ocd004s6 11200 
022514 105711 11300 §618: 
16 100376 11400 
142711 900040 11500 
022524 105761 9000002 11600 8625: 
022530 100375 11700 
2532 9000207 11800 
11900 
» 00300 
2s 0S2377 O40S22 051516 OO400 ~ ENe: 
G2eSS7 377 OSl1e4% 047101 EM3: 
Oe2605 377 O42Se2 O4250 EMY: 
2627 377 QO42See 042503 00700 EMS: 
S22654 051377 O4150S O44S0S OCO800 EM11 
O22700 043377 O42See 020105 00900 EMle 
Qee724 041777 O47117 O5112e% O1000 EM13 
022747 377 O4%7111 2524 Ot 108 EM14 
023015 377 OS410S 2520 01300 #£Od}: 
Ce3047 == 377 «054105 O4eSeO 01400 DHe: 
923070 020277 O4eSe3 932114 O1S00 OH2: 
wesill 377 «040502 O42S23 01600 OH4: 


GO6 


BMI 6S$ ;BR_IF YES 
RTS PC : RETURN 


; THIS SUBROUTINE LOADS THE DMC WITH A RECEIVE SACO 
BIS8 844, (R1) ;REC a 


TSTB (R13 ‘ROY I SE 

BPL 1$ !BR IF NO 

MOV (RS)+,4(R1) sLOAD REC BA 
MOV (RS)+,6(R1) i REC CC 
BICB #40, (RI) LEAR ROI 

TSTB (R15 15 ROY I CLEAR 
BMI 23 IF NO 

RTS RS RETURN 


;THIS SUBROUTINE LOADS THE DMC WITH A TRANSMIT SA/CC 
81S8 1 (RI) ;XMIT oes REQUEST 


TSTB R13 :RDY I SET? 

BPL is : FN 

MOV sys. 4¥(R]) ;LOAD XMIT BA 

MOV (RS) +. 6(R1) “LOAD XMIT CC 

BICB~—s.-« #40. (RI) “CLEAR RQI 

TSTB (R13 -IS RDY I CLEAR 

OMI 25 : F NO 

RTS RS : RETURN 

: THIS SUBROUTINE FORCES THE DMC TO UPDATE THE BASE TABLE 
BIC #207, 2(R1) ;CLEAR ANY OUTPUT _DONES 
BISB =._-# 46, [R11 :ASK FOR ILLEGAL REQUEST 
TSTB (R13 :RDI SET” 

BPL 1$ :BR IF NO 

BIcB = #40, (RL) :CLEAR RQI 

TSTB ss 2 RX} :OUTPUT DONE SET? 

BPL ig :BR IF NOT 

RTS PC : RETURN 

.ASCIZ <377>/TRANSMIT BA ERROR’ 

ASCIZ © <377>/TRANSMIT COUNT ERROR/ 

"ASCIZ <377>/RECEIVE BA ERROR’ 

"ASCIZ <377>/RECEIVE COUNT ERROR’ 

‘ASCIZ <377>/RECEIVE DATA ERROR’ 

"ASCI2 <377>/FREE RUNNING ERROR / 

“ASCIZ <377>/CONTROL OUT ERR ss sae 
“ASCIZ <377>/INTERNAL DDCMP ORR OR COUNTS NON ZERC 
\ASCIZ <377>/EXPECTED FOUND ADDRESS’ 

"aSCI2 «3777 EXPECTED FOUND / 

“ASCIZ «<377>/ SELS SEL6- 

“ASCI2 (377) “BASE+3 THRU BASE+12 


= 
OCONM 


DCOMH. P11 


MACY12 30( 1046) 
18-MAY-77 09:54 


046504 930503 


923137 


ws 
e¢ 


000003 
001264 
001270 
004 
001260 
0003 


OCieSe 
000002 


11-JUL-77 


004% 
004 
002 


004 
004 


12:32 PAGE S7 


SUBROUTINES 


01700 
0 


DHS: 
EVEN 


OT1: 


DTe: 


OTs: 


DT4: 


OTS: 


DOT: 


OT7: 


-ASCIZ 


HO6 


(377) /DMC11 IS HUNG/ 


6,4 
6.4 
4,2 


6,4 
6,4 
4.2 


6.4 
6,4 


OZDMH 


n> 
bee 


MACYL1 3011046) 


11-JUL-?77 


Pll 16-MAY-77 09:S4 


Oeses4 
000006 


004 
002 


002 


12:32 PAGE Se 
SUBROUTINES 
oe 

i 
07700 OTle: 
07800 

79300 
08000 
28200 
GE08 
o8gsoo 
08600 

é 

38800 
08300 
09000 
09100 
0920: 
09300 
09400 OT13: 
09500 
09600 
09700 
Haan 
9990 

10000 .ERRTAB: 
10100 

10200 

10300 

10400 Mle 
10500 HS 
10600 O 
10700 EMe 
ge 
11008 Er 
11100 QO 
11200 OQ 
11300 EM4 
11400 O 
11500 0 
11600 EMS 
11700 O 
11800 O 
11900 EM4 
12000 Oke 
12100 OTs 
12200 EMS 
12300 Oke 
12400 DOTY 
1eS00 =O 
12600 OH) 
2700 ODT 
12800 20 


+Eup 
ii 


I06 


6.4 
6,2 


3,2 
3,2 


19 


PAGE: 


0073 


OIOMM 8 MACYL 30/1046) 
DZOMH. P11 16-MAY-77 09:54 


023554 


023015 


11-JUL-77 12:32 PAGE S9 


SUBROUTINES 
12900 OHl 
He be 
13e He 
13300 OT4 
13400 = EM11 
13600 Brig 
3700 ene 
13800 0 
13900 0 
140 Mle 
14 H 
14 T 
14300 8 EM13 
14400 DH3 
14500 O7T11 
14600 M14 
14? ; HY 
148 Tle 
149 

15000 


15100 CORMAX: 
156800 =. END 


PAGE: 


6074 


KO6 
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Mmmwmma 
babe aoa 


DZDMH.P11 © 16-MAY-77 09:54 CROSS REFERENCE TABLE -- USER SYMBOLS 
= 904373 79% «91S 9248 
al tise cr rst rr 
o02446 sose G63 
1688 ie 1835 si fed abet 26t6 
? 4 
sy) UR BST SST ETS (BEZO 
BASELD Q22040 187513562 2022S 08S )= 1S Pel = 23115 
BASELH Oee1S6 2271 =. 27838 
BINWRD 004714 965+ 968% 99 10068 
BITO = O00001 aj2st 18S 156 18871733 18081879 
B1T1 = oo0002 ir) Ga OC a 6 0S SC 
ae nec ae 
= 00 8 
Bit = BTdooe Bis ues ©7803 688| 773 F888 aan 
2541 2830 
81713 = 920000 ges 14671516 15971908 
BIT14 = 040000 agtht «7811878 aD SH? 18881700 
BITIS = 100000 BOs 485 S72 575 59% (599 1451 
2015 2078 2144 2204 2264 2305 «= 2396 
2788 «= 2790 2818 = Be 
T2 = 000004 938 «65310 7le—S «1156 = s«1787 = 1894 = 2629 
T3 = 000010 gee 1549 861556 9 eSE2 2586 
TY = 990020 Qis 1139 «11621164 = 1977 
TS = O00040 90s 1661 
T6 = 000100 238 1144 «61145 «1551 BHSOs«DEI 
17 = 000200 eg BR eS Gene nl 
v = t 
Bits Boi cbe SC) a Cx 
aM 007054 11878 ©1492 
BRLVL 012252 1617 1627, 1635s B78 
BRW 3730 718 «= BO4s 
xX 003732 719 US 
CHRCNT O04712 363# 966970 98E* §=—1004# §=— 1005 
CKSWR 007606 slo 779—t'ié«@L(C (<&$eSCSCéid'2LD 
CKSWRI 007666 12258 = 1237 
CKSWRe 907700 locks 
CKSWR3 007704 12308 
CKSWRY 00 legis 1239 «= 1246 
CKSWRS. 010014 lel3 1220S‘ 12558 
CLKX O01 1719 
CLRTAB O164S4 24378 ©2495 
CNERR 07 626 «11878 
CNT.MA 001702 196 = 3648484 HBE’CC“(<ié‘a CQ 
ENVRT = 104411 e338 b23—i738——— 7H (GHD C10 
CONERR 007223 621 11878 
C 007114 11878 
CONTAB 902776 630 6438 
CONVRT= 104410 2318 «=6S43) 20 be9s«s107B—Ss 1391 
SORMAK O23554 28828 
2AM Oe 11878 ©1430 


cham O06 
tEAM 001320 1958 4E2# «1289* «1290 «= :1202* 128 


2068 
5840 


27538 


1890 


eae 
2083 


2432 


1519 
2433 


182 


1062 


lle2 


5338 


1228 


4788 
578 


2017 
es00 


2269 
2619 


1703 
eble 


5283 


e606 


2080 


2401 


2787 


1349 
2760 


LO6 
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DZDMM.P11 16-MAY-77 09:54 CROSS REFERENCE TABLE -- USER SYMBOLS 
10 l gre 1395 
10514 l pe 
YCLE 1 2 761 762 12808 
DATABP O00S216 1049% 1052 1074 10778 
DATACL= 104415 e41e 
TAHD 1g4gs 1070 10738 
LAY = 3 3/8 
DEVADR 004370 877% Sle S2e8 
DEVTAB 10 S83 6488 
DH1 023015 28828 
OH2 023047 28828 
DH3 023070 2882s 
DHY 023111 e88es 
DHS 023137 e88es 
DISPLA 001200 1428 498% SO4# 735% 
DISPRE 000174 1288 4 
DMACTY 001306 1898 Sel 676% 677 1280 1294 1376% 15778 
DMCM 007320 634 11878 
DMCROO 001500 2798 
DMCRO1 001510 cb4es 
DMCRO2 001520 2898 
001530 ese 
DMCROY 001540 2998 
DMCROS 001550 3048 
DMCRO& 001560 3098 
DMCRO7 001570 3148 
DMCRIO 001600 3198 
DMCRi1 001610 3248 
DMCRi2 001620 3298 
DMCR13 001630 3348 
DMCR14 001640 3398 
DMCRIS 001650 S448 
OMCR16 001660 3498 
DMCR17 001670 3548 = 
DMCSR 001404 See S68+# 602 607# bles 647 rts 802 
DMCSRH 001406 2638 8 1144e 114S# 114S9# 8 1155# 1156# 1l62% L1eb4# 
DMCTL 001410 ecb4se 8 1309% 13108 1311 
DOMNUM 001310 1908 479 cl 1374# 1389% 1568* 1569 1578 
OMPOY 001412 2658 1133% 1139 1176 1181 1311# 8 l3le# 1313 
DOMPOB 001414 eb68 1150 1313% 13144 
DMRLYL 001376 eS39e 1316# 1317# 1318 O41l1le 
OMRVEC 001374 258s 768 1299 1300# 1316 2410+ 
OmS100 001502 2808 
OmMS101 O01Sle 2ese 
OmS102 001522 2908 
OMS103 001532 2958 
DMS104 O0N1S4e 3008 
OmMS10S OU01SSe 3058 
OMS106 001562 3108 
OmS107 00157e 3158 
OMS110 001602 3208 
OmMS111 OO0l6le2 3258 
OmMSile O0l622 3308 
OMS113 001632 3358 
OMS114 O0164e 3408 


1S83#  1S84s 
1094 1117 

1307% 13088 
1580 


1588 


i163 
1303 


1613 


PGE: 


C076 


MO6 
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Lg a 
l 2 
® 
ls 
1 286s 
OMS202 S24 29is 
DMS203 34 2368 
DMS204 3018 
001554 3068 
D0 1564 gills 
DO 1 3168 
DMS210 001604 3218 
DMS211 001614 3268 
DMS2l2 001624 3318 
DMS213 cyte 3368 
DMS214 1644 3418 
DMS21S 001654 3468 
DMS216 001664 3518 
OMS217 001674 3568 
DMS300 001506 esee 
DMS301 001516 287 
OmMS302 001526 e328 
DMS303 001536 2978 
DMS304% O01S46 3028 
DMS30S 001556 3078 
OmMS306 001566 3les 
DMS307 001576 3178 
DMS310 001606 322 
OMS311 001616 327% 
DMS3l2 001626 3328 
. DMS313 001636 337% 
DMS314 OO1646 3428 
DMS31S OO16S6 3478 
pni3318 001666 3528 
DMS317 001676 3578 
DMTLVL 001402 ebls 1320 1321# 2413% 
ees ie Ge er inne ee 
. MAP 95 788 483 36 S46 662 1290 1292 1370 1375 1605 
cera ao OSeexoatew Leite 
OT1 023156 28828 
OT10 023310 2882 
OT11 023326 28828 
DTle 023340 288es 
DT13 Oe 2882s 
a nn 
TY 3546 eb8es 
ors 023242 28ers 
OTE 023254 2882s 
O17 023272 2882s 
EM11 022654 2882s 
EMle 2700 28828 
M13 27c4 ees 
M14 022747 eb8es 


NO6 
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m3 ? * 
: ! 
NBEX  BIESE0 54968 
ENDEX! 017044 5400 «2S09.—tés«i be OCS22)Ss«S30 SsbB 
ENDEX2 017046 5506 4 BS 178 
ERCTOO 001704 3668 
ERCTO1 O01710 3698 
RCTO2 001714 3728 
RCT 0017 758 
TOY 001754 788 
RCTOS 001730 3818 
ERCTOB 001734 3848 
ERCTO? 001740 3878 
ERCT1O 001744 3908 
ERCTI11 001750 3938 
ERCTIg 001784 3968 
ERCT13 001760 3998 
ERCTI4 001764 4028 
ERCTIS 001770 405s 
ERCT16 001774 4Ogs 
ERCTI7? 02000 4118 
ERR 002700 S92 s«b1Be B22 
ERRCNT 001 leje «|4?,s—“‘i«é CRO 3OSH 
ERRFLG O01 DO28 «Be = s793e 0s Se)=«od1037# ©«=s0SO.—s«dLM® Ss: 
ERRMSG 005172 1047* 1065 10688 
ERTAGO DbeI2e ibe? (10978 
ERT = bOsaE 968 
EXITER 005252 1082 «10878 
FLAG. 021314 D4u31e 24S4 2489 244% 2497 2599 2601" 27328 2882 
FLOAT 002536 sese 59] 
FY 00256 caue «60S S_i‘éiO9Sté«CLS 
HALTS  O0S222 1033 «10798 
HILIN 004366 e7be 903 9218 
 ICOUNT 001222 1898 793~Ctsé«79G8% 
1ISR 017132 2410 «as a4e 
INBUF 007502 e46 ‘Bae 12028 
INCHAR 010020 1231 12598 
INIFLG 001304 5018 507 Se? Sa4e 
INSTER= 104404 5238 42897 
INSTR = 104403 Ste 1381 1394 1403 1482 1491 
INSTR2 GO4166 853 S 
infty O12 1414 «143]s44L—s14SH—s1H70—sL SS 8 
KMCM 5 637 «11878 
LIMITS 004314 892 
CINE 007016 11e78 ©1483 
toek > Bpi3e5 oe fae Oe (10S6 
tOKELG DOL SSE 2038 
COLIN OO4364 8758 9208 
CPCNT 01224 isos 4607928 «= 793té«é‘ 9G 
CSTERR 001234 le4e «6490 «= 7328 «1034 = s«s1036* = 1124s 
MAcTEK Bocr4e ides” 11878 
MCRLE’ BpEEoS Ba; AE" tosh toss t063Ss«dg7® «1328 «1390 


0078 


DZDMH MACYL1 30(1046) L1l-JUL-77 le: 
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MCSRX 006072 737 11878 
MDRTA 007544 984 994 
MEMLIMN 001304 1888 700# 
MEPRSS 005733 736 11878 
MERRPC 006217 1061 11878 
MERRX 006117 743 11878 
MERR2 005760 11878 =1590 
MERR3 006005 673 11878 
MILK 001322 1968 484s 
MLOCK Q06043 714 11878 
MNEW 006144 668 11878 
MODU 006704 11878 1453 
MPASSX 006106 741 11878 
MPFAIL 005675 1121 11878 
MOM OOS&56 861 11§.« 
MR 00S755 723 1187s 
MRESET= 004000 968 

MSTCLR= 104412 2358 1126 
MTITLE 001000 136 S11 
MTSTN 006130 10S9 11878 
MTSTPC 006031 11878 

MVECX 006100 739 11878 
NEXT 001216 1578 739 
NOI2CT 007154 S23 11878 
NODEV 002674 c7 6168 
NUM 0064S0 11878 1382 
OISR 017422 oMi2 25978 
OK 46 603 6108 
ONE 001302 1878 

PACTOO 001702 3658 

PACTO1l 001706 3688 

PaCTO2 001712 3718 

PACTO3 O01716 3748 

PACTOY 001722 3778 

PACTOS 001726 380% 

PACTO& 001732 3838 

PACTO7 001736 3868 

PACT1O 001742 3898 

PACT11 O0O1746 3928 

PACTi2 001752 3958 

PACT13 001756 3988 

PACT14 001762 4018 

PACTIS OO01766 4O4s 

PACT16 001772 4078 

PACT17 001776 4108 

PARAM = 104405 225% 1331 
PARAM] 004234 88le 98 
PARBIT= 368 

PARERR 004310 884 886 
PASCNT 1230 162s 734% 
PERF OR= 37 968 

PF TAB 430 ll2e 11288 
POPRO = 012600 728 1086 
POP 1SP= 726 708 

POPeSP= Oectbct& 748 801 
PRIC 006547 11878 1413 


32_ PA 


BO? 
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12048 


74S 


1352 
1346 


1948 
1330 
1092 
1282 


639 


1383 


888 
738 


1288# 


1427 


ecl4 


1683# 


1396 


8978 
746 


1293# 


1437 


2077 


1866# 


1405 


904 
771 


1297 

1447 1462 1476 

2143 2203 2263 2304 2395 

196% 2012% 2075# 2141# 2201#  2261% 
i484 1493 

906 908 

1304# 


230e* 


PAGE: 0079 
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PS = 177776 638 476% 71l# 1617# 1627# 2403% 2461]# 
PUSHRO= 010046 718 1083 
PUSH1S= Dove ae 
= 0246 ra 
QV.FLG O01 204s 4BOe 750% 790 
021372 1694 7 1811 1819 1958 2273 2319 23393 27448 
RBUFF 020356 2419 27178 
RBUFFE O2131l2 2440 27258 
RBUFF1 O203S6 27188 
RBUFFe Oe0462 27198 
RBUFF3 O20S66 720 
RBUFFY 020672 e7els 
RBUFFS 020776 e7ees 
RBUFF6 021102 e7e38 
RBUFF7 021206 8 
RCNTAB 020230 2427 2429 2567 2574 2711s 
RCOUNT 021370 1692 1751 1814 1817 27438 - 
RONTAB Oce02b6 2438 2472 2486 2668* 2670# 7148 
RECBA *Oe0Dbe2 2566 26SS 26798 
G 00S220 1075 10788 
RESTAR 1108 11148 
RESUME O20060 e3l2e 231 2349 2351% 2437% 2536 es44# 2548 2615% 26788 
RESOS = 104407 22398 1078 oo “ Sakae ace 
RETURN 001214 1S68 4% 720% 724 761% 799% 803 1092# 1095 1127 14S*# 1355# 1357 
RFLAG 021320 1699 1804 1807 1832 27348 
022416 9S7 e272 2318 28438 
ROMCLK= 104414 2398 1134 1137 1174 1179 
RUN 001316 1938 4BS*# 1le86% 287% 1294 
. SAVACT OOl3le 1918 671 1$88* 
001314 1928 479% 748% 751% I1581# 
SAvPC O001e7é 18S8 622% 642 ge39* 1099 
VRO 001260 1788 938% 943 2882 
SAVR1  O0l2be2 1798 628% 937% Say 
001264 1808 936# 2882 
001266 1818 935* Que 
SAVRY 001270 1828 934# 947 2882 
SAVRS 001272 1838 933* 948 2882 
SAYSP 001274 1848 
SAVOS = 104406 2e78 1038 
SCAN 016604 e4628 2528 
SCANL 017102 2464 2467 2470 25238 
ANE OlbE1E 2463 e4eS8 ve nahi 
SCOPE = 104400 else 1854 1931 2000 2063 2129 2139 2249 2286 237 251s 
SCOP1 = 104401 2178 > 
022502 1836 1905 1982 2045 2111 2348 28708 
IP 002632 573 57 597 600 6068 
SOFTSW 010052 1229 12688 
NT= 004713 Jos 991* 1005s 
007340 11878 1440 
STACK = 001200 ie 690 1093 1116 
STAT 001249 1708 a fa 
STAT1  OO1266 esis 301% 68S 1690 1701 ) 187 1906 ° 


5 2020 20°78 


1954 é 
23% e 2404 2433 


DO? 
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sTat2 001370 2528 1302 
STATS 001372 aogg* 4303* 16871870 19091951 2017, 2080 aM 2206 ek 23072288 
STRTSW 001236 ioe Sige Slee 517, S19 S29 S31 ECC“ 2 7L 1323 13N7% 1377 
SvOS 004402 9338 
SWFLG 010016 480# 825 9 1224* «12518 = 12578 
SWMES 007205 11878 1207 
SWMES1 007215 11878 1230 2 . 
SR 01202 43@ | 497# 499s S03# = S197] 7HCi7BLC (<GeSC7HSCCéKLDC (‘Gséi SCE? =~ 
1081 1088 = 1090 «11521212 = 12508 
SWREG 000176 less = $03 slel2 = 1270 
SwOO = 000001 4$¢ 517, 13771601 
SWO1 = O00002 W448 721013231347 
SwO2 = 000004 438 
SWO3 = OO0010 428 bbb 
SWwOY = 000020 418 
SWOS = OOOO4O 408 
SWOB = 000100 3981152 
Sw? = 000200 388 
SwO8 = 000400 378 ©1088 
Sw09 = 001000 368 B12 
SWi0 = 002000 358 1090 
SWi1 = OO4000 348-788 
Swi2 = 010000 338 © Be? s:1027 
SW13 = 020000 3e8 1032 
Swl4 = 040000 318 
SWiS = 100000 308 : 7 
TBUF = 021324 1766 = «1796-21818 = 1877, 1981 = 2090 2276S 2322) 2338S a7 abe 
TBUFF 020120 e4e4 = 2631 2633 8635) Bb Be 
TCOUNT 021322 1767, 1789 8735s : Tee 
TEMP = OOL416 e7ie = S71 1118 = 1119 911608 = 116S*# §=1171# §=1183" = 1706# §=:1709% §«=174*««L717# «17238 
17eG 174e«1747# = «1753e «I75be «170k 17b3e17eGe «17728 «T7S* «17! 881s | 1geue 
190c# 1933 1964" 1967 027% 20308 2093 209+ 2156* 2158 22]é+ 2219e 23796 
e2Bc# 230% 2329 9 2459e = 25038 
TEMP] 01246 1738 -537# «1189 613 1614" §=17758 = 17918 P 
TEMPe 001250 ob(dt 228 USL 7ee lees 192Se | 1994e 2057 2123 ©2183 © 2243e 23714 aueOe 
% # 
TEMP3 001252 I75@ S40# «= Shbe# 1B b27# «1193 1386 «= 1389S s«ISO1* §=1730# §=«19208 1949s 19268 
19958 20SBe 2ic4# 2184" 2c44# 23724 24768 bide sheds 26362 2862 
TEMPY = 001254 7oeSH1# «61195 1399 1402 1408 «S441 «= 1487) 14904861499) st731e = 19508 
19278 19964 §=— 2059 «2125 2185*# 224S* 2373" 9 2519% 2625" 2age : s 
TEMPS 001256 1774 SHe# = 1197 1380 = 1393e «1599 18S1* = 152ge «19972 92060 «= 1zge «21ete © 22uee 
2374" 2520" 2882 
TFLAG 021316 1698* 1789 1792# 1834 2417* 2428 2443 2491# 24934 «27338 
TIMER = 104416 e438 
TKCSR 001204 1488 = 84812141259 1655 
TKOBR 001206 498-8500 856 Sse17—Sss«s1219s1abl Ss? 
TLAST = 016214 1380 27478 
TPCSR 001210 1608 «68320 BSH «1029s 215 
O0121e Siu B34# = BSb# = 10Si# «= BENe LEB 
TRPOK 004730 10178 
TSTNC 001226 ole |491# = 1102, 11301334 111343 1682% = 18ES*# | ISHSe® Olle 2OTHe 2148 
a e200# 2260# 2301+ 2392+ 
Stl 012320 13371355 LEB 


TETic. 15476 e201 22608 


— 
ED? 
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DZOMM.P11 Y-77 
TST11 015632 2e61 230 
TSTl2 O16214 2302 23928 8 2747 
ac a 
TST4 014236 tae Ea 
TSS 014510 2012 20748 
TST& 014772 2075 21408 
TST? 015234 2141 22008 
TTST 003612 715% 716% 718% 719% 7828 
TWOSYN= 010000 968 
TYPDAT 0& 053 1071 10748 
TYPE = 104402 198 S11 S23 33 62 625 633 
37 739 741 4 831 844 861 
1061 1063 1067 107 liel 1227 1230 
1426 1429 1436 1439 1446 14S2 1461 
TYPMSG 005106 10S1 10S48 
C 006526 11878 #81404 
VECMAP 012010 i$89 16018 
WHICH 012002 1392 15978 
WRDC 004710 962% 99S* 10038 
WRKO.F 005174 1066 10698 
XBX 1028 1030 10328 
XCNTAB O20250 2442 2444 2662 27128 
CSR OO3S46 738 7638 
XDNTAB 2 2b4S# 2647% 27158 
XERR 003570 744 77e8 
XFRELD O224S0 1876 1960 20e3 2089 2275 2321 2esés 
XHEAD OQ06224 535 11878 
XLOC 00302 593# 611% 614 64S 6588 
XMITBA O2006e 2418 242e 24eS 2573 2680s 
742 7698 
XSTATQ 7454 S44 11878 
XTSTN 005330 1 11008 
XVEC 003554 740 7668 
x0 = 0001190 26838 26868 26898 26958 27018 
x] = 000101 26838 c686s 26898 26928 2cb95# 26988 27018 
X2 = 000102 26838 2c6868 2cb898 e2cb9e8 26958 27018 
x3 = 900193 26838 26868 2689s 92 ecb9Se 26988 27018 
x4 = 000104 26838 26868 cb89e cbS28 26958 26988 27018 
xS = 000105 26838 26898 c692e8 26958 26988 27018 
XE = 000106 eb838 c6868 26898 ecb9e8 26958 26988 e7018 
x7 = 000107 e6838 e6868 26898 c69e8 26958 26988 e27018 
ZERO 001300 
$COD = #ee844 U } 
$c = 177777 ls lb648 1667 16788 16558 18618 
Sogo" 2297 Beh shar 23888 ae awe 
8 7 
SENDAD 903S2e 123 7SSs 1079 
o0dle ls 1664 1678 1680 16858 S 1861 
19498 2001 2007 2009 2014 20158 2064 
2138 2143 el44e 2190 2196 2203 
‘ 2289 2297 239 2304 23058 2378 2388 
s = 000014 1683 16858 1866 18688 6 19498 
f. 2201 2204 ecb) ecb4s# 230 23058 23% 
a = 000037 Ey 2078 215 217s 2198 2el8 2238 
a 


27108 


PAGE: 


£0™ 


e- 


uo 
moo 


0082 


FO? 
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= 023554 1088 109 lles 1198 1248 1278 1318 1358 1378 1898 1908 1918 1928 
e7e8 e778 27398 2808 ebls 2828 e84a 2ess e8bs 2878 esse 2308 2eSis 
2928 e348 29Se 23968 2978 98 3008 3018 3028 3048 3058 3068 3078 


3418 34e8 S448 3458 3468 3478 3498 3508 3518 3S28 3548 3558 3S&8 
78 $1s 6578 675 1110 1120 11688 12038 1205s 60 1263 ] 
1378 1422 1S4e 1546 1$93 162 1656 6S3 1686 688 1691 1702 1705S 
1708 1716 1746 1755 1762 1771 1785 1790 1794 1797 1800 1805S 1909 
18le 1815 8 1829 1869 1871 1874 1883 0 19S2 i9ss 1966 201& 
2018 2021 2029 2043 2079 2081 2084 2095 2109 2145 2147 2150 2154 
2170 2205 2207 2210 2214 2218 2230 2céS 2267 2270 2306 S08 2313 
2328 2397 2399 2402 2434 2449 2452 2479 2547 e$79 2611 eb! 26:7 
2620 cb808 e718 e7lee 27148 27158 27188 27198 27208 e72i8 27228 ere38 27248 
7 27448 8627468 = = e?7S9 2762 2789 2792 2819 2822 
BEGIN 003152 6908 
CNYRT O04472 234 gcse 
CONVR OO4465 232 os4s8 
DATHC OOSS 242 11598 
DELAY 005436 238 11328 
E 003364 7318 2393 
ERRTA 023414 O46 2882s 
OC4 11S 10268 
INSTE O04154 224 C618 
INSTR 222 S408 
INST1 004070 8448 864 
G 004072 S428 BY4Sa 
MSTCL OOS465 236 11438 
PARAM 004174 226 8728 
PFAIL Q0S3 113 478 11078 1115 
SOS 004434 230 9438 
ooss04 240 11488 
SAVOS 904374 2280 9298 
003576 216 7738 
SCOP1 003736 218 Bils 
Si 002002 13e 4768 432 L247 
TIMER O0S6! 244 11708 
TRE 904; 117 10148 
TRPTG 00123¢ 2i48 1013 
—E 9037&e 220 82c8 


GO? 
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MEND ls 725 
DMERNT le 
T 758 «1711 2=Ss«1719—'s«a1732@~S=téi‘z2734H~=~C«aHs«é«dL7SBHC«i«L7ESS—SCt*=«é«dL:7?7744 
180s 1810 1813 1816 1825S 1830 18S2 1 1892 
2034 2038 2044 2061 2100 104 2110 ele? 161 
SAUTO asks a 2333 2345 2375 2480 2Sel 2 2b25 
$BASEC le 1827 1908 1983 2046 2lle 2172 2232 2353 
UF F le 1199 
YTE le 2683 2e$86 2689 2692 2695 2698 2701 2704 
SCKDAT te Da? 
COMP ls 
SCYCLE le 1271 
DATAF le 1664 
SEOP le 72s 
SEXER le 2237 
SFD le 1736 2774 2834 
$F INI le 2747 
$GETP ie 
le 2250 
le 2804 
ADE ls 
$LSTDAG ls 1935 
I ls 
SMOCK ls 
SMSG ls 1187 
SNONEX le e200) 206% 
SORUN is 18ss 
SPFAIL le 1103 
$PROC le 2130 
$PROCI le 2158 
SQUEST is 1381 130 1492 1462 8 149) 
SRANCL ig 1131 
SRCLK le 1134 4137 #117 ~)3=61179 
SRESUM le 2289 
Haat ee! ee 
s } l 1 o7 
SSIMBC ls 
SSKIPT ls 1685 1868 1949 e0is 2078 2144 2204 2264 
$50F TC Ie 1207 
S7RPDE oud! els 217 219 221 223 22s 227 229 
STSTN ls 1680 1863 1943 20093 2072 2138 2198 2258 
SVARIA Ie $134 
3x2 — L664 1678 18S5 1861 1935 13941 200! 2007 
2259 eect 2233 2297 2373 2388 


- ABS. 023554 000 


ERRORS DETECTED: © 
oZOMH , OZDMH/SOL “CRE 
RUN-TIME: 8 le 1 SE 
BIN-TIME FATIO: 199/ 


t~ - 
Or ON) 
£™rme@ 
+ o 


DODMH  MACYL1 
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